作者shyfang (冷~~)
看板NCTU-STAT95G
標題Re: [分享]彩色無痕跡平面版 漸層背景!
時間Mon May 19 12:45:01 2008
那我告訴你們怎麼把圖放上去好了
background2_1 <- function(x = c(-20,20), y = c(-20,20), r = 0.5, g=0.5, b =
0.5, xcorint = 5, ycorint = 5, axbox = TRUE, xlable="",ylable="",title ="")
{
…
#comment 底下五行，就是不要有格線及座標
# abline(v=ix, h=iy, col = "lightyellow", lty = "dotted")
if(axbox == TRUE){
box()
# axis(1, ix)
# axis(2, iy)
}
else{
# axis(1, seq(ax-xcorint,bx+xcorint,xcorint),lwd=2, lty='dotted')
# axis(2, seq(ay-ycorint,by+ycorint,ycorint),lwd=2, lty='dotted')
}
}
## Example
x <-c(-20,20)
y <-c(-30,30)
##(1)紅色
background2_1(x , y, r = 0.01, g = 0, b = 0)
par(new=T) #接下來就隨意，看你要放什麼圖啦~~
plot(1:100,col=rainbow(100))
#看起來好像是左右漸層，不曉得有沒有上下 、中心之類的 呵~~
※ 編輯: shyfang 來自: 140.114.36.142 (05/19 12:46)
1F：推 josephw:XD 其實用points, curve...etc就可以放圖 05/19 13:49
2F：→ josephw:只是用這個要有中間格子線XD....其他地方漸層改位置就可以 05/19 13:49
3F：推 josephw:@@因為這個是讓想改軸直接不用再重新去定義axis 05/19 13:58
4F：→ shyfang:喔，因為我只想要背景，本來還想說，把xy寫死算了 05/19 17:04
5F：→ shyfang:有些圖還是只有plot才畫得出來的 05/19 17:15
6F：推 josephw:XD 05/19 18:00