sparkTable을 사용하여 막대 그래프를 그릴 수 있습니까?

나는 sparkBar를 할 수 있지만 sparkHist는 할 수 없다. 가능한가요? ?sparkTable을 사용하여 막대 그래프를 그릴 수 있습니까?

library(sparkTable) 
data(pop) 
x <- pop[pop[,2]=="Insgesamt",3] 
b <- newSparkBar(values=x-min(x)) 
getParameter(b, type="values") 
b <- setParameter(b, c("darkred", "darkgreen","black"), type="barCol") 
plotSparks(b, outputType="pdf", filename="testBar1")

출처

2012-05-21 frankc

재현 가능한 예를 들려 줄 수 있습니까? – Abe

나는 어떤 종류의 도움이 될지 모르겠습니다. 히스토그램을 얻을 수없는 것은 아니기 때문에 분명히 존재하지 않습니다. 누군가 막대 그래프를 히스토그램으로 변환시키는 sparkTable의 주문을 알고 있기를 바랍니다. sparkTable은 다소 드문 드문 문서화되어 있습니다. – frankc

유용한 예제는 문제를 설명하고, 시도한 것을 보여주고, 멈추게 된 곳을 보여줍니다. 예제를 제공하면이 질문에 대답하고 대답을 확인하는 것이 더 쉬울 것입니다. 예, sparkHist를 수행 할 수는 있지만 새로운 기능을 만들어야합니다. 예제 데이터 세트를 제공하고이를 사용하여 sparkBar를 만드는 방법을 사용하면이 질문에 쉽게 답할 수 있습니다. – Abe

당신이 생각했던 것 (그것은 쉽게 newSparkHist functon에 랩,하지만 난 피난처 '할 수있는이 같은 것입니다 :

이

은 example(newSparkBar)에서 sparkBar을 (만드는 방법의 예입니다 여기에 코멘트를 읽은 후) ... 방해

library(sparkTable) 
data(alcohol) 
hvals <- hist(alcohol$value,plot=FALSE)$counts 
b <- newSparkBar(values=hvals,barCol=c("gray","gray","black")) 
plotSparks(b, outputType="png", filename="testBar1")

enter image description here

출처

2012-05-24 23:15:20

를 T, 나는 버전의 히스토그램을 포함했다 sparkTable 패키지 0.9.4. 기본적으로 이전 답변과 동일한 스타일로 제안되었습니다.

1) 만 박스 플롯과 히스토그램 정상 및 로그 정규 분포 데이터

#Example newSparkHist 
hh <- newSparkHist(values=rnorm(100)) 
plotSparks(hh, outputType='pdf', filename='testHist1') 


#Example sparkTable with Hist+Box with 2 variables in 10 different groups 
datEx <- data.frame(variable=sample(paste("Cat",1:10,sep="_"),1000,replace=TRUE), 
    value=rnorm(1000),value2=rlnorm(1000)) 
b <- newSparkBox() 
h <- newSparkHist() 
content <- list(function(x) { round(mean(x),2) }, 
    function(x) { round(median(x),2) }, 
    function(x) { round(quantile(x,.25),2) }, 
    function(x) { round(quantile(x,.75),2) }, 
    b, 
    h, 
    function(x) { round(mean(x),2) }, 
    function(x) { round(median(x),2) }, 
    function(x) { round(quantile(x,.25),2) }, 
    function(x) { round(quantile(x,.75),2) }, 
    b, 
    h 
) 
names(content) <- c(paste(c("Mean","Median","Q25","Q75","Boxplot","Histogram"), 
    "_v1",sep=""), 
    paste(c("Mean","Median","Q25","Q75","Boxplot","Histogram"),"_v2",sep="") 
) 
varType <- c(rep("value",length(content)/2),rep("value2",length(content)/2)) 
datEx <- reshapeExt(datEx,idvar="variable", varying=list(2,3)) 
x2 <- newSparkTable(datEx, content, varType) 
plotSparkTable(x2, outputType="html", graphNames="o2",filename="t1")

와 sparkTable을 만드는 매우 흥미로운 아닌 sparkHist()

2) 플로팅 :

여기서 두 가지 예

출처

2012-06-06 06:28:04

sparkTable을 사용하여 막대 그래프를 그릴 수 있습니까?

답변

관련 문제