1

我正在为他们的 splom 图表使用 plotly 的代码。代码正在运行,但数据点并未绘制在正在创建的图上。

这是我的代码

    pl_colorscale=list(c(0.0, '#19d3f3'),
                       c(0.333, '#19d3f3'),
                       c(0.333, '#e763fa'),
                       c(0.666, '#e763fa'),
                       c(0.666, '#636efa'),
                       c(1, '#636efa'))
   
    axis = list(showline=FALSE,
                zeroline=FALSE,
                gridcolor='#ffff',
                ticklen=4)
    
    fig <- df %>%
      plot_ly() 
    fig <- fig %>%
      add_trace(
        type = 'splom',
        dimensions = list(
          list(label='Household Income', values=~insurance$income),
          list(label='Coverage', values=~insurance$coverage),
          list(label='Claim Amount', values=~insurance$claim_amount),
          list(label='Retired Status', values=~insurance$retire)
        ),
        text=~class,
        marker = list(
          color = as.integer(df$class),
          colorscale = pl_colorscale,
          size = 7,
          line = list(
            width = 1,
            color = 'rgb(230,230,230)'
          )
        )
      ) 
    fig <- fig %>%
      layout(
        title= 'Insurance Data',
        hovermode='closest',
        dragmode= 'select',
        plot_bgcolor='rgba(240,240,240, 0.95)',
        xaxis=list(domain=NULL, showline=F, zeroline=F, gridcolor='#ffff', ticklen=4),
        yaxis=list(domain=NULL, showline=F, zeroline=F, gridcolor='#ffff', ticklen=4),
        xaxis2=axis,
        xaxis3=axis,
        xaxis4=axis,
        yaxis2=axis,
        yaxis3=axis,
        yaxis4=axis
      )
    
    fig

这将输出 4x4 图,其中每个变量位于 x 和 y 轴上,但没有数据点。我也收到了关于家庭收入强制引入的 NA 的警告,我认为这对于所有变量都是相同的

4

0 回答 0