有没有办法强制R将小数点放置在茎和叶节点的管道中？

Question

假设的数据是：

y=rpois(100,50) 
z=rpois(50,500) 
x=rpois(5,1000) 
v=c(y,z,x) 

当我这样做stem(v)它小数两处地方的权|。我曾尝试使用scale和width，但似乎无法强制使用|处的小数。有没有办法做到这一点？如果是，如何？

Answer 1

嗯，不，因为你的数据在31到1021之间（对于我的随机数字）。干的想法是尝试尽可能多地显示您的数据点。如果小数点是在酒吧，那么这将不会留下任何东西给栏的右侧，因为你已经得到了完整的数字...

stem(v/100) 

做你说什么，但我不知道它的你想要什么...

Answer 2

这里是一个黑客。它通过以下方式工作：（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) 
}