R空间坐标绘图

做出来的图是这个样子的

用ggplot2画地图。设置geom_point（）函数的时候别忘了colour=group。之后再用scale_colour_manual函数设置你想要的颜色，估计也许会用到colour_gradiant函数

nuomin 发表于 2014-11-19 22:18
用ggplot2画地图。设置geom_point（）函数的时候别忘了colour=group。之后再用scale_colour_manual函数设置 ...

能不能麻烦你就我这个数据，给出具体的作图代码？

这个用excel中的气泡图就能实现的

花衣舞蝶 发表于 2014-11-20 11:37
这个用excel中的气泡图就能实现的

关键是导师非要用R语言做

我也是R初学者，不知道这个能不能帮到你
> x<-read.csv("C:/Users/Administrator/Desktop/做气泡图/2.csv",header=T)
> library(ggplot2)
> p<-ggplot(data=x,mapping=aes(x=X.coordinate,y=Y.coordinate,colour=dbh))
> p+geom_point()

感觉图做出来不好看，我再研究研究

1. pointdata <- read.table("clipboard",header=T)
   
2. x <- pointdata[,2]
   
3. y <- pointdata[,3]
   
4. colour <-  pointdata[,1]
   
5. pdata <- structure(list(x=x,y=y,colour=colour),
   
6.                    names=c("x","y","colour"),.rownames=1:length(x),class="data.frame")
   
7. max_val <- max(abs(colour))
   
8. min_val <- min(abs(colour))
   
9. values <- seq(min_val, max_val, length = 11)
   
10. qplot(pdata,x=x,y=y,colour=colour)+
    
11.     scale_x_continuous()+
    
12.     scale_y_continuous()+
    
13.     scale_colour_gradientn(colours = heat.colors(10),
    
14.        values = values, rescaler = function(x, ...) x, oob = identity)+
    
15.     theme_bw()

复制代码