Я хотел бы разделить два года на графике, используя график (аналогично тому, как это можно сделать с помощью facet.grid в ggplot.
Я искал на форумах код, а также учебники длясюжетно, но я не нашел подходящий код.
библиотека (сюжетно) Местоположение <- c ("Jelovski_borst", "Jelovski_borst", "Jelovski_borst", "Jelovski_borst", "Jelovski_borst", "Lehen_na_Pohorju", "Lehen_na_Pohorju " "Lehen_na_Pohorju", "Lehen_na_Pohorju", "Lehen_na_Pohorju") Sampling_month <- с ( "march_16", "april_16", "may_16", "march_17", "april_17", "march_16", "april_16"," may_16"," march_17 "," april_17 ") Sampling_year <- c (" 2016 "," 2016 "," 2016 "," 2017 "," 2017 "," 2016 "," 2016 "," 2016 "," 2017 ", "2017") ECM_mean <- c ("52", "49", "57", "49", "42", "33", "56", "32", "55", "65")data <- data.frame (Location, Sampling_month, Sampling_year, ECM_mean) </p>
p <- plot_ly (data, x = ~ Location, y = ~ factor (Sampling_month, level = c ("march_16", "april_16)"," май_16 "," март_17 "," апрель_17 ")), z = ~ ECM_mean,type = "scatter3d", mode = "маркеры + линии", символ = ~ местоположение, символы = c ('круг', 'крест', 'o'), цвет = I ('черный'), маркер = список (размер= 5))%>% layout (scene = list (xaxis = list (title = ''), yaxis = list (title = '', categoryorder = "array", categoryarray = c ("march_16", "april_16","may_16", "march_17", "april_17")), zaxis = list (title = 'Dinamika ECM vršičkov (%)'))) p
Я хотел бы знать, существует ли код для заговорас помощью которого я мог бы отдельно показать два года на графике (аналогично функции facet.grid в ggplot).