作者chu1216 (chu)
看板R_Language
标题[问题] 如何更改颜色跟scale 谢谢
时间Mon Dec 12 09:05:31 20
请问一下
原来的问题, 我用这下面的code解决了, 但我想改颜色跟scale
library(tigris)
library(dplyr)
CA_Del.Norte.test <- block_groups("California", "Del Norte")
CA_Del.Norte.test.2=CA_Del.Norte.test %>% mutate(COUNT_MS = ifelse(GEOID %in%
c('060150002021'), 1, 0))
plot(CA_Del.Norte.test.2["COUNT_MS"])
画出一个地图, COUNT_MS只有0跟1, 我希望呈现白色(0)跟红色(1),
旁边的scale也是0跟1, 而不是0-0.5-1.5
请问我要如何更改颜色跟scale呢?
谢谢!!!
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 100.36.151.153 (美国)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1670807135.A.721.html
1F:→ locka: 请提供可以复制的程式码,这样大家可以比较快帮上忙,感谢~ 12/12 11:05
2F:→ locka: 回到问题,如果你不想用现成套件(leaflet,ggmap,mapbox...e 12/12 11:09
3F:→ locka: tc)的话,你要做的是计算资料笔数之後,分配(多到少)颜色的 12/12 11:10
4F:→ locka: 渐层,再把对应的点位跟颜色画在图上 12/12 11:10
5F:→ locka: 我是觉得用现成的比较简单XD 12/12 11:10
※ 编辑: chu1216 (100.36.151.153 美国), 12/12/2022 20:23:57
6F:推 fox1375: plot(benton_bgs["TRACTCE"]) 12/12 20:22
7F:→ fox1375: 想要指定颜色就运算一个新栏位,然後画那个栏位的值 12/12 20:23
8F:推 fox1375: 因为你COUNT_MS是数值型别,运算时ifelse里面要放"1" "0" 12/12 20:31
9F:→ fox1375: 或直接as.character改过去 12/12 20:31
10F:→ chu1216: 谢谢!我改了'1'跟'0', 但颜色也不是我想要的, 请问我应该 12/12 20:36
11F:→ chu1216: 怎麽改呢?? 非常感谢! 12/12 20:37
12F:推 fox1375: color.vector <- ifelse(df$var == 0, "white", "red") 12/13 01:19
13F:→ fox1375: plot(df["var"], col = color.vector) 12/13 01:20
14F:→ chu1216: 感谢各位大神! 12/14 11:34