0

?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」も含めたいと思います。明日プレゼンテーションがあるので、何か助けていただければ幸いです。ありがとう。

4

1 に答える 1

3

rChartsでそれを行う方法は次のとおりです。重要なのは、chartメソッドを使用して JavaScript 関数を に渡すことtooltipContentです。これは 4 つの引数を受け入れます。そのうちe、実際のデータ ポイントへのアクセスを提供する引数を使用します。したがって、各ポイントにe.point.Gene_Nameアクセスします。rcharts ビューアーGene_Nameでこのチャートのデモを表示できます

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

ノート。値が JS リテラルであることを rCharts に示すには、 タグ#!とタグが必要です。!#これにより、ペイロードを に変換する際に、文字列としてではなく JS リテラルとして渡すことが保証されjsonます。

于 2013-09-29T17:00:44.713 に答える