R中的绘图函数（二项式分布的累积概率函数？）

Question

我正在尝试绘制一个函数（二项式分布的累积概率函数？），但是面临困难...

我的变量是

L<-data.frame(x=seq(1, 103, by=2))

该函数如下所示...

在此处输入代码

我尝试过这样的事情，但是没用...。

func=func(L){
  L_d<-data.frame(x=seq(1, 103, by=2))
  i=seq(0, (L-1)/2)
  A=choose(L,L-i)*0.55^(p-i)*0.45^i
  sum=sum(A)
}

任何人都可以帮助我定义函数并教我如何绘制此函数吗？

如果可以的话，将不胜感激。