我正在为他们的 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 的警告,我认为这对于所有变量都是相同的