所以我创建了2D等高线图。但是，我的情节中有一些白色斑点，我不知道该怎么办。我有颜色中断级别，当数字较大时，颜色会变深，而颜色较小时，颜色会变少。我认为会出现白点，因为特定点低于零。我想控制数字的范围，是否可以消除线条流畅？也许有帮助吗？我对Akima和轮廓图不熟悉，所以我需要一些帮助。
# Actual Plot Non-Tolerant 1 pop
z=((rd222$X1)/(rd222$X1+rd222$X2+rd222$Y2+rd222$Y1))
t <- interp(x, y, z)
li.zmin <- min(rd222$z,na.rm=FALSE)
li.zmax <- max(rd222$z,na.rm=FALSE)
breaks <- pretty(c(li.zmin,li.zmax),10)
colors <- heat.colors(length(breaks)-1)
cols = rev(colorRampPalette(c('darkred','red','blue','lightblue'))(24))
filled.contour(t,col=cols,plot.title = title(main = "Alpha2 vs cT - Non-Tolerant population (Y1+X1)", xlab = "tolerance cost (cT)", ylab = "parasite induced death rate (alpha2)"),key.title = title(main = "pop"),nx=100,ny=100)
