Plot showing jumps between simulations
我的geom_path()存在此问题。我想一起绘制许多模拟,但是出于某种原因,生成图时,ggplot会在不同的模拟之间绘制直线,而不是遵循正确的模拟。
colnames(HIV.prev.HF.Rand.95) <- outMatRand[[1]]$time
HIV.prev.HF.Rand.95_m <- melt(HIV.prev.HF.Rand.95)
colnames(HIV.prev.HF.Rand.sat) <- outMatRand[[1]]$time
HIV.prev.HF.Rand.sat_m <- melt(HIV.prev.HF.Rand.sat)
融化的数据看起来像这样:
Var1 Var2 value
. . .
. . .
197 97 1986 0.001215456
198 98 1986 0.001277602
199 99 1986 0.001200965
200 100 1986 0.001247436
201 1 1987 0.001173847
202 2 1987 0.001301196
203 3 1987 0.001312864
204 4 1987 0.001544837
205 5 1987 0.001467538
206 6 1987 0.001509051
207 7 1987 0.001297585
208 8 1987 0.001538991
. . .
. . .
我使用geom_path()作图
HF.95.sim.plt <- ggplot() +
geom_point(data=as.data.frame(Fdata.prev1),aes(year,prev*100)) +
geom_errorbar(data=as.data.frame(Fdata.prev1), aes(x=year,y=prev*100,ymin=lw*100,ymax=up*100)) +
geom_path(data = HIV.prev.HF.Rand.95_m, aes(x = Var2, y = value*100, group = Var1),alpha = 0.2) +
geom_path(data = HIV.prev.HF.Rand.sat_m, aes(x = Var2, y = value*100, group = Var1),color='red') +
ylim(0,2)
HF.95.sim.plt
这仅仅是因为我要一起绘制一百个模拟吗?