Как построить множественную линейную регрессию в R с помощью библиотеки plotly? Получаю:
But I want something like this:
введите описание изображения здесь
Я использую набор данных mariokart (фрейм данных со 143 наблюдениями с 12 переменными. Я думаю, из пакета openintro). Приведенный ниже код сгенерировал неправильный график:
d <- data.frame( x <- seq(1,10, by = 0.13), y <- seq(1,10, by = 0.13) )
вот мое самое большое сомнение, как мне нарисовать самолет? z - это плоскость.
mod <- lm(formula = totalPr ~ duration + startPr, data = mario_kart)
z <- matrix(rtruncnorm(n=531, a=30, b=70, mean=35, sd=20), nrow = length(d$x), ncol = length(d$y)) #z is the plane
# draw the 3D scatterplot
p <- plot_ly(data = mariokart, z = ~total_pr, x = ~duration, y = ~start_pr, opacity = 0.6) %>%
add_markers()
# draw the plane
p %>%
add_surface(x = ~x, y = ~y, z = ~z, showscale = FALSE, cmax=1)