我从WSJ那里找到了关于S P500性能的非常吸引人的图表： 我正在尝试在R中重新创建它,但我不知道如何最好地绘制数据,例如 data-data.frame(stock=c("A","B","C","D"),group=c(rep("Fin",2),rep("Ind",2)),Per
我正在尝试在R中重新创建它,但我不知道如何最好地绘制数据,例如
data<-data.frame(stock=c("A","B","C","D"),group=c(rep("Fin",2),rep("Ind",2)),Perf=rnorm(4,0,1),mvalue=abs(rnorm(4,100,50)))
有没有人知道如何重新创建它(例如使用ggplot2？)或者有没有人做过类似的情节？ Thx提前.
或投资组合：require(portfolio)
dt<-data.frame(ticker=paste0(sample(LETTERS,100,T),sample(LETTERS,100,T),sample(LETTERS,100,T)),
value=abs(rnorm(100,10000,4000)),
perc_change=rnorm(100,0,0.1),
group=sample(LETTERS[1:4],100,T)
)
rownames(dt)
map.market(dt$ticker,lab=c(T,T), area=dt$value, group=dt$group, color=dt$perc_change, main="Stock Map")