R: ggplot2を使ã£ã¦ã¿ã‚‹(5): Taglibro de H
ヒストグラムã®ã¤ã¥ã。 ç©ã¿é‡ãã¦ã¿ã‚‹ã€‚ library(ggplot2) data(iris) q <- ggplot(iris, aes(Sepal.Length, fill = Species)) q2 <- q + geom_bar(binwidth = 0.25) cols <- c("#F3C5C7", "#FCF5AE", "#8CCAA4") q3 <- q2 + scale_fill_manual(values = cols) print(q3) グループ別ã«æ¨ªã«ä¸¦ã¹ã‚‹ã€‚ q4 <- q + geom_bar(binwidth = 0.25, position = "dodge") + scale_fill_manual(values = cols) print(q4) 密度グラフをé‡ãã¦ã¿ã‚‹ã€‚ q5 <- q + geom_density(alpha = 0.5) +
R苦手ã®ä¼š#7(Skypeèªæ›¸ä¼š) - ã‚‚ã†ã‚«ãƒ„丼ã¯ã„ã„よãª
id:wakuteka主催ã®èªæ›¸ä¼š7回目ã§ã™ã€‚å‰å›žãƒ¬ãƒæ›¸ã„ã¦ãªã„ã“ã¨ã«ä»Šæ°—ã¥ããªã©ã€‚ 今回ã¯ã“ã“。 Rã§ã®ãƒ‡ãƒ¼ã‚¿ã®è¦–覚化(1) ã‚ã¨id:wakutekaã®ä½œã£ã¦ãã‚ŒãŸå‚考資料ãŒã‚ã‚Šã¾ã™ã€‚ http://wakuteka.info/R/091103 ã®ãƒ¼ã¨ 扱ã†ãƒ‡ãƒ¼ã‚¿ > data(VADeaths) > VADeaths Rural Male Rural Female Urban Male Urban Female 50-54 11.7 8.7 15.4 8.4 55-59 18.1 11.7 24.3 13.6 60-64 26.9 20.3 37.0 19.3 65-69 41.0 30.9 54.6 35.1 70-74 66.0 54.3 71.1 50.0 VA(ãƒãƒ¼ã‚¸ãƒ‹ã‚¢)ã«ãŠã‘る都会ã€ç”°èˆŽã€ç”·å¥³ã€å¹´é½¢åˆ¥ã®æ»äº¡çŽ‡ãƒ‡ãƒ¼ã‚¿ã€‚ 棒グラフ(barplot) VADeathsã®ã‚ˆã†ãªè¡Œ
Using CJK Fonts in R and ggplot2
ツイッターã§ggplot2ã§æ—¥æœ¬èªžä½¿ãˆã‚‹ã®ï¼Ÿçš„ãªè©±ãŒã‚ã£ãŸã®ã§ã€æ˜”書ãã‹ã‘ãŸè¨˜äº‹ã‚’ä¸é€”åŠç«¯ã«æã上ã’ã¦ã¿ã¾ã—ãŸã€‚ çµè«–ã‹ã‚‰è¨€ã†ã¨ä½¿ãˆã‚‹ã‚“ã§ã™ãŒã€OSã¨ã‹ãƒ‡ãƒã‚¤ã‚¹ãŒä½•ã‹ã€ã¨ã‹ã§ã„ã‚ã„ã‚é•ã†ã®ã§ã€å®Œå…¨ã«ç†è§£ã™ã‚‹ã®ã¯çµæ§‹å¤§å¤‰ã§ã™ã€‚ ã‚ã¨Rã®ã‚°ãƒ©ãƒ•ã‚£ãƒƒã‚¯ã‚¹ã¯baseベースã¨gridベースãŒã‚ã‚‹ã‚“ã§ã™ãŒã€å…¥é–€æ›¸ã§ã¯çµ¶å¯¾ã«baseベースãªã®ã§ã€gridベースã«ãªã˜ã‚ãªã„ã€ã“ã®ã‚ãŸã‚Šã‚‚誤解を招ãåŽŸå› ã«ãªã£ã¦ã‚‹ã‚ˆã†ãªæ°—ãŒã™ã‚‹ã€‚æç”»ã®è‡ªç”±åº¦ã¯gridベースã®ã»ã†ãŒå¤§ãã„ã§ã™ã€‚ãŠæ‰‹è»½ãªãƒ—ãƒãƒƒãƒˆãªã‚‰baseã ã£ãŸã‚“ã ã‘ã©ã€gridベースã®ã‚°ãƒ©ãƒ•ã‚£ãƒƒã‚¯ã‚¹ãƒ‘ッケージãŒå‡ºã¦ãã¦gridã§ã‚‚ãŠæ‰‹è»½ã«ã§ãるよã†ã«ãªã‚Šã¤ã¤ã‚ã‚‹ã€ã¨ã„ã†ç¾çŠ¶ãªã®ã‹ãªã€‚ ãŠã¾ã˜ãªã„ é¢å€’ãªè§£èª¬ã¯ä¸è¦ã€ã¨ã„ã†äººã¯ä»¥ä¸‹ã®ä¾‹ã§ã€‚ library(ggplot2) d <- data.frame(x=1:2, y=1:2, t=c("ã‚","ã„"))
Analyses and Visualization of Typhoon in R and ggplot2 #1: The basics
å°é¢¨ãŒæ¥ãã†ã§æ¥ãªã„ï¼ é–¢æ±ã€‚ Rã§ã®è§£æžã®ä¸€ä¾‹ã¨ã—ã¦ã€å°é¢¨ã®è»Œé“ã¨ã‹å¼·ã•ã¨ã‹ã‚’処ç†ã—ã¦ã¿ã‚ˆã†ã€‚ å°é¢¨ã®ãƒ‡ãƒ¼ã‚¿ã¯å®Ÿé¨“心ç†å¦ã®ãƒ‡ãƒ¼ã‚¿ã«è¿‘ã„ã®ã§ã€ãã®æ‰‹ã®è§£æžã«ã¯å¿œç”¨ã§ãã‚‹ã¨æ€ã„ã¾ã™ã€‚ 今回ã¯åŸºç¤Žç·¨ã€åˆ†æžã¯ãªã„ã§ã™ã€‚ データを引ã£å¼µã£ã¦ãã¦ã€ã‚´ãƒ‹ãƒ§ã‚´ãƒ‹ãƒ§åŠ å·¥ã—ã¦ã€è»Œé“ã¨å¼·ã•ã‚’プãƒãƒƒãƒˆã™ã‚‹ã¨ã“ã‚ã¾ã§ã€‚ 次回ã‹ã‚‰ã€Rã¨ã‹ä½¿ã†ã¨ãƒžã‚¸ã§ãƒ‡ãƒ¼ã‚¿ã‹ã‚‰æŽ¢ç´¢çš„ã«æƒ…å ±ã‚’å¼•ã£å¼µã‚Šå‡ºã™ã®æ¥½ã よã〜ã€ã£ã¦è©±ã‚’ã™ã‚‹ã‹ã‚‚ã—ã‚Œã¾ã›ã‚“。 科å¦ã®æ‰‹æ³•ã¯ä»®èª¬ãƒ‰ãƒªãƒ–ンã˜ã‚ƒãªã„ã¨ã ã‚ã£ã—ょã€ã£ã¦ã„ã†äººã¯ã€ãƒ‡ãƒ¼ã‚¿ãƒ‰ãƒªãƒ–ンãªã‚„ã‚Šæ–¹ã¯é¦´æŸ“ã¾ãªã„ã¨æ€ã†ã®ã§ã€èªã¾ãªã„æ–¹ãŒã„ã„ã¨æ€ã„ã¾ã™ã€‚ # plyrã¨ã‹ã‚‚一緒ã«ãƒãƒ¼ãƒ‰ã—ã¦ãれるã®ã§, ggplot2ã‚’ãƒãƒ¼ãƒ‰ library(ggplot2) # ベストトラックデータ thanks to æ°—è±¡åº bst <- 'http://www.jma.go.jp/jma/jma-eng/jma-cente
1
ランã‚ング
ãŠçŸ¥ã‚‰ã›
ランã‚ング
リリースã€éšœå®³æƒ…å ±ãªã©ã®ã‚µãƒ¼ãƒ“スã®ãŠçŸ¥ã‚‰ã›
最新ã®äººæ°—エントリーã®é…ä¿¡
j次ã®ãƒ–ックマーク
kå‰ã®ãƒ–ックマーク
lã‚ã¨ã§èªã‚€
eコメント一覧を開ã
oページを開ã
{{#tags}}- {{label}}
{{/tags}}