无法使用dataframe plot_ly创建3d曲面

Question

我一直试图用剧情创造一个3D表面，但我不能。我做的是以下内容：

dataf <- data.frame(x=as.numeric(1:50), y=as.numeric(1:50), z=as.numeric(1:5))

然后

plot_ly() %>% add_trace(data = dataf,  x=dataf$x, y=dataf$y, z=dataf$z, type="mesh3d" ) 

但问题是它打印出一个空图。

感谢任何帮助。