実践ã§å¦ã¶ã€€ã‚³ãƒ¼ãƒ‘ス活用術 6 | ç ”ç©¶ç¤¾ WEB マガジン Lingua リンガ
çªç„¶ã§ã™ãŒã€political ã¨ã„ã†èªžã®ç›´å¾Œã«ç”Ÿèµ·ã™ã‚‹å…¨ã¦ã®èªžã®ä¸ã§ã€æœ€ã‚‚é »åº¦ã®é«˜ã„語ã¯ä½•ã§ã—ょã†ã‹ã€‚ãªãŠã€ã“ã®èª¿æŸ»ã«ç”¨ã„るコーパスã¯ã€BNCweb（全体）ã¨ã—ã¾ã™ã€‚ ãã®ç”ãˆã‚’知るãŸã‚ã«ã€ã¾ãšã¯ã€BNCweb ã®ã‚µã‚¤ãƒˆã«ã‚¢ã‚¯ã‚»ã‚¹ã—ã€æ¤œç´¢ãƒœãƒƒã‚¯ã‚¹ã« political ã¨å…¥åŠ›ã—ã¦ã‹ã‚‰ã€Start Query ã®ãƒœã‚¿ãƒ³ã‚’押ã—ã¾ã—ょã†ï¼ˆãã®ä»–ã®è¨å®šã¯ãƒ‡ãƒ•ã‚©ãƒ«ãƒˆã®ã¾ã¾ï¼‰ã€‚ http://bncweb.lancs.ac.uk/ 上記ã®æ¤œç´¢ã‚’è¡Œã†ã¨ã€political ã¨ã„ã†èªžã¯ã€BNC 全体ã®ä¸ã®1759テã‚ストã§ä½¿ã‚ã‚Œã¦ãŠã‚Šã€ãã®é »åº¦ãŒåˆè¨ˆã§30098回ã§ã‚ã‚‹ã“ã¨ãŒåˆ†ã‹ã‚Šã¾ã™ã€‚ãã—ã¦ã€political ã®ã‚³ãƒã‚±ãƒ¼ã‚·ãƒ§ãƒ³ã‚’調ã¹ã‚‹ã«ã¯ã€New Query　∨ ã¨è¡¨ç¤ºã•ã‚Œã¦ã„るメニューã‹ã‚‰ Collocations... ã‚’é¸æŠžã—ã€å³éš£ã® Go! ã¨ã„ã†ãƒœã‚¿ãƒ³ã‚’押ã—ã¾ã™ã€‚ã™ã‚‹ã¨ã€BNC Collo
ワイブル回帰ã¨æ¯”例ãƒã‚¶ãƒ¼ãƒ‰ãƒ¢ãƒ‡ãƒ«ã®ã‚µãƒ³ãƒ—ルデータ生æˆã¨æŽ¨å®š | gepulog
ワイブル回帰 ワイブル分布を仮定ã—ã¦ã€å½¢çŠ¶ãƒ‘ラメータ共通ã€å°ºåº¦ãƒ‘ラメータを説明変数ã§å¤‰ã‚るモデル \begin{align*} F(t|x) = 1 - \exp\left( - \left( \frac{t}{\eta(x)} \right)^m \right) \\ \eta(x) = \exp(\beta * x) \end{align*} ワイブル回帰ã®ã‚µãƒ³ãƒ—ルデータ set.seed(0) n <- 1000 # å°æ•° m <- 2 # 形状パラメータ beta <- -1 # ä¿‚æ•° beta0 <- 10 # 切片 x <- rnorm(n) data.df <- data.frame(tt = rweibull(n, shape = m, scale=exp(beta * x + beta0)), x = x, status=rep(1,n)) > library(eha)
R Advent Calendar 2014 2日目「アリã•ã‚“(@AriLamstein)ã¨ã‚ªãƒ¬ç‰©èªžã€ - My Life as a Mock Quant
ã¯ã˜ã‚ã« ã“ã®è¨˜äº‹ã¯R Advent Calendar 2014ã®2日目ã®è¨˜äº‹ã§ã™ã€‚Rã®è©±ã¨ã„ã†ã‚ˆã‚Šã€Japan.Rã«å‘ã‘ãŸå‰ãƒ•ãƒªã§ã€ã€Œç™»å£‡è€…ã®1人ã§ã‚るアリã•ã‚“(@AriLamstein)ã¯ä½•è€…ã§ã€ä½•ãŒã©ã†ã—ã¦Japa.Rã«å‚åŠ ã•ã‚ŒãŸã®ã‹ï¼Ÿã€ã¨ã„ã†ãŠè©±ã§ã™ã€‚R Advent Calendar 2014ã«å‚åŠ ã—ã¦ã„ã¦Japan.Rã«ã¾ã å‚åŠ ç™»éŒ²ã—ã¦ã„ãªã„良ã„åã®çš†ã¯ã€ã“ã“ã‹ã‚‰å…ˆã¯èªã¾ãªãã¦ã„ã„ã‹ã‚‰ã€ã¨ã‚Šã‚ãˆãšJapan.Rã«å‚åŠ ç™»éŒ²ã—ã¦ãŠãã¨ã„ã„ã¨æ€ã†ã‚“ã 。 å‰ãƒ•ãƒªã€œDTã®ä¾¡å€¤ã¯ã‚¢ãƒªã•ã‚“ã ã‘ã«ã‚¢ãƒªã¯ã—ãªã„〜 Japan.Rã®ã‚¿ã‚¤ãƒ テーブル 13:00〜13:30 å—付 13:30〜13:45 オープニングトーク @gepuro, @0kayu 13:45〜14:15 choroplethrパッケージã§ã‚³ãƒãƒ—レスマップを簡å˜ä½œæˆ @AriLamstein 14:15〜14:45 データサイエ
第2回日本社会心ç†å¦ä¼šæ˜¥ã®æ–¹æ³•è«–セミナー: GLMMãŒåˆ‡ã‚Šé–‹ãæ–°ãŸãªçµ±è¨ˆã®ä¸–ç•Œ | 日本社会心ç†å¦ä¼š
竹澤æ£å“²ï¼ˆåŒ—æµ·é“大å¦ï¼‰ï¼ãªãœã„ã¾GLMM㋠資料：動画 ä¹…ä¿æ‹“弥（北海é“大å¦ï¼‰ï¼GLMMã®ç´¹ä»‹ 資料：動画 清水裕士（広島大å¦ï¼‰ï¼ç¤¾ä¼šå¿ƒç†ã¨GLMMã®é–¢ä¿‚ 資料：動画 è³ªç–‘å¿œç” å‹•ç”» 一般化線形混åˆãƒ¢ãƒ‡ãƒ«ï¼ˆGeneralized Linear Mixed Model; GLMM ）ã¨ã¯ã€Œå¤‰é‡åŠ¹æžœã‚’å«ã‚€éžæ£è¦ãªãƒ‡ãƒ¼ã‚¿ã‚’分æžã™ã‚‹ãƒ„ールã€ã§ã‚る。ã‚ã¾ã‚Šè€³ã«ã—ãŸã“ã¨ãŒãªã„方も多ã„ã‹ã‚‚ã—ã‚Œãªã„。ã ãŒã“ã®10å¹´ã»ã©ã®é–“ã«ã€å¿ƒç†å¦ã®å¤–ã®é ˜åŸŸã§æ·±ãé™ã‹ã«æµ¸é€ã—ã€ç€å®Ÿã«å½±éŸ¿åŠ›ã‚’広ã’ã¤ã¤ã‚る。動物行動å¦ã‚„生態å¦ã§ã¯ã€å¤§å¦é™¢ã®çµ±è¨ˆæŽˆæ¥ã§æœ€åˆã«æ•™ãˆã‚‹å¤§å¦ã‚‚増ãˆã¤ã¤ã‚る。第2回春ã®æ–¹æ³•è«–セミナーã§ã¯ã€GLMMãŒåˆ‡ã‚Šé–‹ãæ–°ãŸãªä¸–界を紹介ã™ã‚‹ã€‚ ã ãŒãªãœã„ã¾GLMMãªã®ã‹ï¼Ÿ ã„ãã¤ã‚‚ã®ç†ç”±ãŒã‚ã‚‹ãŒã€ã“ã“ã§ã¯ï¼“ã¤ã ã‘紹介ã—ãŸã„。 1. 社会心ç†å¦è€…ãŒä½¿ã†å¤šãã®çµ±è¨ˆãƒ„ールã¯GLMMã«ã‚ˆã£ã¦ç½®ãæ›ãˆã‚‰ã‚Œã‚‹ 我々ã¯ã€èª¬æ˜Žå¤‰æ•°ã¨
Javaã«ä¾å˜ã›ãšã«xlsxã‚’èªã‚€ - ç›†æ ½æ—¥è¨˜
R Advent Calendar2014ï¼ Qiitaã®ï¼’日目ã§ã™ã€‚ Javaã«ä¾å˜ã—ãŸããªã„æ–¹ã€ã„ã‚‹ã¨æ€ã„ã¾ã™ã€‚ ã“ã¡ã‚‰ã«ã‚るよã†ã«ã“ã‚Œã¾ã§xlsxファイルを扱ãŠã†ã¨æ€ã†ã¨ã€å¤šãã®ãƒ‘ッケージã§ã¯Javaã‚’å¿…è¦ã¨ã—ã¦ã„ã¾ã—ãŸã€‚ ãã‚“ãªäº‹æ…‹ã‚’解決ã™ã¹ã開発ã•ã‚ŒãŸã®ãŒopenxlsxパッケージã§ã™ã€‚ コード例 以下ã¯å…¥å‡ºåŠ›ã®ä¾‹ã§ã™ã€‚ # ブックã‹ã‚‰ç›´æŽ¥ãƒ‡ãƒ¼ã‚¿ãƒ•ãƒ¬ãƒ¼ãƒ ã¨ã—ã¦èªã¿è¾¼ã¿ãŸã„å ´åˆ read.xlsx("iris.xlsx", sheet=1) readWorkbook("iris.xlsx",sheet=1) # 仮想ブックã¨ã—ã¦èªã¿è¾¼ã¿ãŸã„å ´åˆ loadWorkbook("iris.xlsx") # 出力 # 作æˆã—ãŸä»®æƒ³ãƒ–ックを出力ã—ãŸã„å ´åˆ saveWorkbook(wb, file = "iris.xlsx", overwrite = TRUE) # 仮想ブックを作æˆã›ãšãƒ‡ãƒ¼ã‚¿
ãŠçŸ¥ã‚‰ã›
ランã‚ング
ランã‚ング
リリースã€éšœå®³æƒ…å ±ãªã©ã®ã‚µãƒ¼ãƒ“スã®ãŠçŸ¥ã‚‰ã›
最新ã®äººæ°—エントリーã®é…ä¿¡
j次ã®ãƒ–ックマーク
kå‰ã®ãƒ–ックマーク
lã‚ã¨ã§èªã‚€
eコメント一覧を開ã
oページを開ã
データ解æžç’°å¢ƒRã®æ•´å‚™ã¨åˆ©ç”¨ - 2014年度 データ解æžç’°å¢ƒRã®æ•´å‚™ã¨åˆ©ç”¨
Bio7 2.0 for Windows Released! | R-bloggers
The Four Pipes of magrittr | R-bloggers
{{#tags}}- {{label}}
{{/tags}}