对于每个数据点“符号”和“名称”,我有一些数据和两个类别。我正在绘制数据并用不同的符号和颜色映射类别,如下所示。
data <- data.frame(
x= c(1,2,3,4,5,6,7,8),
y = c(10,11,10,12,11,9,8,13),
symbol = c("invalid", "valid", "invalid",
"valid", "valid", "valid","valid", "valid"),
name = c("A", "B", "B", "A", "A", "A", "B", "B"))
plot_ly(data) %>%
add_markers(y = ~y, x = ~x, symbol = ~symbol, color = ~name,
symbols = c(4, 27),
mode = 'markers',
#split = ~name,
colors = c("red", "navy"))
Run Code Online (Sandbox Code Playgroud)
传说非常拙劣。
我想将两个图例条目与十字架合并,并为图例中的十字架设置中性颜色,如下所示:
我尝试使用该split参数,但这没有帮助。
如何禁用R中的"双击图例以隔离一个跟踪"交互?我希望双击才能获得两次点击效果.
以下是如何使用Javascript执行此操作的示例:
Plotly.newPlot('graph', [{
y: [1, 2, 1]
}, {
y: [3, 4, 2]
}])
.then(gd => {
gd.on('plotly_legenddoubleclick', () => false)
})Run Code Online (Sandbox Code Playgroud)
<script src="https://cdn.plot.ly/plotly-latest.min.js"></script>
<body>
<div id="graph"></div>
</body>Run Code Online (Sandbox Code Playgroud)
它使用gd.on('plotly_legenddoubleclick', () => false).我不知道如何将其翻译成R.
R中的例子:
library(plotly)
plot_ly() %>%
add_trace(y = c(1,2,1), x = c(1,2,3), mode= "graph") %>%
add_trace(y = c(3,4,2), x = c(1,2,3), mode= "graph")
Run Code Online (Sandbox Code Playgroud) 我有一个ggplot:
ggplot()+geom_line(data = data.frame(y = c(1,2,3), x=c(1,2,3)), aes(y=y,x=x))
Run Code Online (Sandbox Code Playgroud)
我想保留默认的轴中断和标签(在我的程序中,我不知道先验绘图的限制。)
在x = 1.5时,我想在x轴上添加带有标签“ hi”的附加刻度线。
我知道scale_x_continuous(),但是我不知道如何访问“由转换对象计算的默认中断”。