我有以下代碼繪製的箭頭,用梯度: csa <- function(x1,y1,x2,y2,first.col,second.col,length=0.15, ...) { cols <- colorRampPalette(c(first.col,second.col))(250) ...
確定! 回上一頁