【发布时间】:2021-10-01 19:54:05
【问题描述】:
我正在使用 R 编程语言。我在 R 中制作了以下 3D 图:
# set seed for reproducibility
#load libraries
set.seed(123)
library(dplyr)
library(plotly)
#create data
n <- 3
my_grid <- expand.grid(i1 = 1:n, i2 = 1:n)
my_grid$final_value = with(my_grid, sin(i1) + cos(i2) )
#make plot
plot_ly() %>%
add_trace(data = my_grid, x=my_grid$i1, y=my_grid$i2, z=my_grid$final_value, type='mesh3d') %>%
add_surface(
z = my_grid %>% as.matrix(),
surfacecolor = my_grid,
cauto=F,
cmax=max(my_grid$final_value),
cmin=min(my_grid$final_value)
)
这会产生以下情节:
正如预期的那样,这个图看起来非常合乎逻辑:它显示了一个 3D 表面,其中 x = i1,y = i2,z = final_value,并且图的颜色根据“final_value”。
问题:如果我尝试向网格中添加更多数据,然后创建绘图:
#create more data
n <- 50
my_grid <- expand.grid(i1 = 1:n, i2 = 1:n)
my_grid$final_value = with(my_grid, sin(i1) + cos(i2) )
#make plot
plot_ly() %>%
add_trace(data = my_grid, x=my_grid$i1, y=my_grid$i2, z=my_grid$final_value, type='mesh3d') %>%
add_surface(
z = my_grid %>% as.matrix(),
surfacecolor = my_grid,
cauto=F,
cmax=max(my_grid$final_value),
cmin=min(my_grid$final_value)
)
这个图表不仅看起来“奇怪”,而且悬停文本中的“y 坐标”(1697)正在显示原始数据中不存在的值:
#display histogram of values
par(mfrow=c(1,3))
hist(my_grid$i1)
hist(my_grid$i2)
hist(my_grid$final_value)
问题:在上面的直方图中,“1697”的值没有出现在任何变量中。那么,这么大的值怎么可能显示在 plotly 图中呢?
谢谢
【问题讨论】:
标签: r plot plotly data-visualization r-plotly