Question

制定3个月的天然气价格曲线。我有一些轴问题。我希望能够显示日期而不是天数。

library(ggplot2)
library(Quandl)
library(magrittr)
require(plotly)

#Get first 3 month on the nat gas curve data from Quandl
my_start_date <- "2013-01-05"

gas1<-Quandl("CHRIS/CME_NG1", start_date = my_start_date, type = "xts")
gas2<-Quandl("CHRIS/CME_NG2", start_date = my_start_date, type = "xts")
gas3<-Quandl("CHRIS/CME_NG3", start_date = my_start_date, type = "xts")

#isolate the last prices
gas1a<-gas1[,"Last"]
gas2a<-gas2[,"Last"]
gas3a<-gas3[,"Last"]

p <- merge(as.zoo(gas1a), as.zoo(gas2a), as.zoo(gas3a), all = FALSE)

#3d graph
plot_ly(z = p, type = "surface")%>%
  layout(title = "3 month Nat Gas curve",
         scene = list(
            xaxis = list(title = "Month"),
            yaxis = list(title = "Days"),
            zaxis = list(title = "Price")))

Answer 1

你在找这个吗？

plot_ly(y=index(p), z = p, type = "surface")%>%
  layout(title = "3 month Nat Gas curve",
         scene = list(
            xaxis = list(title = "Month"),
            yaxis = list(title = "Days", tickangle = 180),
            zaxis = list(title = "Price")))

在曲面图中绘制轴格式Plotly R

1 个答案: