作者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/m.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