对于可视化,我使用geom_path
制作粗曲线:
require(ggplot2)
require(Hmisc)
len=50
edge=data.frame(bezier(x=c(0, 1, 2), y=c(0, 1, 0),evaluation = len))
edge$Sequence <- sin( seq(0,pi,length.out=len) )
ggplot(edge,aes(x = x, y = y, size = Sequence)) +
geom_path() +
scale_size( range = c(.3, 20), guide = F) +
theme_bw(base_size = 16) + ylim(0,.6) +
scale_alpha(guide=F)
显然我可以增加len
这会改善一些事情,但这对于我创造的复杂图表来说是缓慢的b)不满意。
除了试图破解ggplot2
/ grid
来源之外,还有一个直接的解决方法吗?
感谢。
答案 0 :(得分:0)
听起来像是一个geom-ribbon或geom-polygon的工作,取决于你是想要一个填充的形状,还是许多单独的部分