Plot Wolfram Mathematica 10.3中的绘图

我一直在做我的统计学作业，我应该建立一个最大似然函数，然后绘制它。但出于某种原因，mathematica向我展示了一个没有绘图的图形：

这是我的剧本：

caseLike[[Phi], y] := ([Phi]^y)*((1 - [Phi])^(1 - y))

totalLike[[Phi], data] := !( *UnderoverscriptBox[([Product]), (i = 1), (5)]((caseLike[[Phi], data[i]])))

Length[totalLike[[Phi], data_List]]

totalLike[[Phi], {0, 1, 1, 0, 1,}] (1 - [Phi])^( 5 - {0, 1, 1, 0, 1, Null}1 - {0, 1, 1, 0, 1, Null}[ 2] - {0, 1, 1, 0, 1, Null}[3] - {0, 1, 1, 0, 1, Null}[ 4] - {0, 1, 1, 0, 1, Null}[5]) !(*SuperscriptBox[([Phi]), ({0, 1, 1, 0, 1, Null}[ 1] + {0, 1, 1, 0, 1, Null}[2] + {0, 1, 1, 0, 1, Null}[ 3] + {0, 1, 1, 0, 1, Null}[4] + {0, 1, 1, 0, 1, Null}[5])])

Plot[totalLike[[Phi], data], {data, 0, 1}]

---

MMA中的空绘图的极好调试技巧。尝试用表[Totalike[phi，data]、{data，0,1,02}]或类似的东西替换绘图，看看表中是否填充了合理的数字，或者表中是否有其他内容。所有函数参数都需要下划线，例如：

caseLike[phi，y\uz]：=

（修复这些问题时一定要重新启动内核）MMA中空绘图的出色调试技巧。尝试用表[TotalIke[phi，data]，{data，0,1，.02}替换绘图或者类似的内容，然后查看表中是否填充了合理的数字，或者表中是否还有其他内容。所有函数参数都需要下划线，例如：

caseLike[phi，y]：=

（修复这些内容时请确保重新启动内核）