Question

我在？nPlot（）中添加标签时遇到问题。例如：

```{r nvd3plot, echo=FALSE,results='asis'}
set.seed(9485)
dat<- data.frame(Gene_Name= LETTERS[1:15], Value1= sample(-8:20,15,replace=TRUE),Value2=sample(-6:10,15,replace=TRUE),stringsAsFactors=FALSE) 
library(rCharts)
r1<- nPlot(Value1~Value2,data=dat, type="scatterChart")
r1$show('inline')
```

现在，它会显示每个点的值。我想还包括“Gene_Name”和值。如果我明天有演讲，任何帮助将不胜感激。感谢。

Answer 1

以下是使用rCharts的方法。关键是使用chart方法并将javascript函数传递给tooltipContent。它接受四个参数，我们将使用e参数来提供对实际数据点的访问。因此，e.point.Gene_Name会为每个点访问Gene_Name。您可以在rcharts viewer

上查看此图表的演示

dat<- data.frame(
  Gene_Name= LETTERS[1:15], 
  Value1 = sample(-8:20, 15, replace = TRUE),
  Value2 = sample(-6:10, 15, replace = TRUE)
)

library(rCharts)
r1<- nPlot(Value1~Value2,data=dat, type="scatterChart")
r1$chart(tooltipContent = "#! function(key, x, y, e){
  return '<b>Gene Name</b>: ' + e.point.Gene_Name
} !#")
r1

请注意。您需要#!和!#标记来向rCharts指示该值是JS文字。这将确保在将有效负载转换为json时将其作为JS文字而不是字符串传递。

rChart。在scatterChart中添加其他标签

1 个答案: