有没有办法强迫R把小数点放在茎叶图的管道上?
假设数据为:有没有办法强迫R把小数点放在茎叶图的管道上?,r,R,假设数据为: y=rpois(100,50) z=rpois(50,500) x=rpois(5,1000) v=c(y,z,x) 当我执行stem(v)时,它将小数点放在|的右边两位。我尝试过使用比例和宽度,但似乎无法强制小数点位于|。有办法做到这一点吗?如果是,怎么做?这里有一个黑客。它的工作原理是:(1)捕获stem的输出,(2)将十进制两位数放在|的右侧,(3)将行写回控制台 stem_with_dot <- function(x, ...){ h = capture.ou
y=rpois(100,50)
z=rpois(50,500)
x=rpois(5,1000)
v=c(y,z,x)
当我执行
stem(v)
时,它将小数点放在|的右边两位。我尝试过使用比例
和宽度
,但似乎无法强制小数点位于|。有办法做到这一点吗?如果是,怎么做?这里有一个黑客。它的工作原理是:(1)捕获stem
的输出,(2)将十进制两位数放在|
的右侧,(3)将行写回控制台
stem_with_dot <- function(x, ...){
h = capture.output(stem(x, ...))
stem_plot = sub("\\| ([0-9]{2})", "| \\1.", h)
writeLines(stem_plot)
return(invisible)
}
stem_with_dot不,因为您的数据在31到1021之间(对于我的随机数)。stem的想法是尝试显示尽可能多的数据点。如果小数点在横条上,那么横条的右边不会留下任何东西,因为你有整数
stem(v/100)
照你说的做,但我不确定这是你想要的…对不起,我是说右边的;在任何情况下,stem(v/10)
都会返回我想要的结果。