[B! r] lesamoureusesã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯

lesamoureuses id:lesamoureuses

rã«é–¢ã™ã‚‹lesamoureusesã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ (6)

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

${{author_name}}$
{{author_name}}{{created}}
{{ #comment }}{{ comment }}{{ /comment }}
- {{ label }}

${{author_name}}$

{{{comment_expanded}}}

{{label}}

{{#is_bookmark}}ãƒªã‚¹ãƒˆ{{/is_bookmark}}{{^is_bookmark}}ãƒªãƒ³ã‚¯{{/is_bookmark}}

TwitterãŒãƒªãƒªãƒ¼ã‚¹ã—ãŸæ™‚ç³»åˆ—ç•°å¸¸å€¤æ¤œå‡ºã®ãŸã‚ã®Rãƒ‘ãƒƒã‚±ãƒ¼ã‚¸{AnomalyDetection}ã‚’è©¦ã—ã¦ã¿ã‚‹ - æ¸‹è°·é§…å‰ã§åƒããƒ‡ãƒ¼ã‚¿ã‚µã‚¤ã‚¨ãƒ³ãƒ†ã‚£ã‚¹ãƒˆã®ãƒ–ãƒã‚°
ã‚‚ã†æ¾ã®å†…ã‚‚æ˜Žã‘ã¦ã—ã¾ã„ã¾ã—ãŸãŒã€é…ã‚Œã°ã›ãªãŒã‚‰çš†ã•ã‚“æ˜Žã‘ã¾ã—ã¦ãŠã‚ã§ã¨ã†ã”ã–ã„ã¾ã™ã€‚ä»Šå¹´ã‚‚ã‚ˆã‚ã—ããŠé¡˜ã„ã„ãŸã—ã¾ã™ã€‚ ã§ã€å¹´æ˜Žã‘æ—©ã€…ã«Twitter ã‚¨ãƒ³ã‚¸ãƒ‹ã‚¢ãƒ–ãƒã‚°ã«é¢ç™½ã„ãƒã‚¿ãŒä¸ŠãŒã£ã¦ã„ãŸã®ã§ã—ãŸã€‚ ãã®åã‚‚{AnomalyDetection}ã¨ã„ã†Rãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ã€‚ãƒãƒ«ã‚¹ç ²ã«å‚™ãˆã¦TwitterãŒé‰„å£ã®é˜²å¾¡ã‚’æ•·ã„ã¦ã„ã‚‹ã“ã¨ã¯å¤šãã®äººãŒã”å˜çŸ¥ã ã¨æ€ã„ã¾ã™ãŒï¼ˆç¬‘ï¼‰ã€ãã†ã„ã†ãƒãƒ«ã‚¹ç ²ã®ã‚ˆã†ãªç•°å¸¸ãªã‚¢ã‚¯ã‚»ã‚¹ã®è·³ãä¸ŠãŒã‚Šã ã£ãŸã‚Šã€é€†ã«ã‚µãƒ¼ãƒãƒ€ã‚¦ãƒ³ãªã©ã§ã‚¢ã‚¯ã‚»ã‚¹ã®ç•°å¸¸ãªè½ã¡è¾¼ã¿ãŒå‡ºãŸæ™‚ã«ã„ã¡æ—©ãæ¤œå‡ºã™ã‚‹ã¨ã„ã†ã®ãŒç›®çš„ã®åˆ†æžãƒ•ãƒ¬ãƒ¼ãƒ ãƒ¯ãƒ¼ã‚¯ã®ã‚ˆã†ã§ã™ã€‚ ã¨ã„ã†ã“ã¨ã§ã€è©±é¡ŒãŒæ–°é®®ãªã†ã¡ã«ã¡ã‚‡ã£ã¨è©¦ã—ã¦ã¿ã‚ˆã†ã¨æ€ã„ã¾ã™ã€‚ ã©ã†ã„ã†ä»•çµ„ã¿ã§å‹•ã„ã¦ã„ã‚‹ã®ã‹ ç†è«–çš„èƒŒæ™¯ã¨ã—ã¦ã¯ã€ãã‚‚ãã‚‚generalized ESD (extremely Studentized deviate) testã¨ã„ã†å¤–ã‚Œå€¤æ¤œå‡ºã®æ‰‹æ³•ãŒ
lesamoureuses 2015/01/09
Rã§ã‚„ã£ã¦ã‚‹ã®ã‹ãƒ¼

r
ãƒªãƒ³ã‚¯
Rã§ã‚‚ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼ã§ã‚¨ãƒã„ã“ã¨ã‚„ã‚ŠãŸã„!! - yasuhisa's blog
ã‚¨ãƒã„ã‹ã¯åˆ†ã‹ã‚‰ãªã„ã‘ã©ã€Rã‚‚ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼ã§ä½¿ãˆã‚‹ã¨ä¾¿åˆ©ã ãªã¨æ€ã£ãŸã€‚Perlã¨ã‹ã§ã‚‚ã„ã„ã‘ã©ã€åˆ†æ•£ã¨ã‹ãã†ã„ã†ã®è¨ˆç®—ã•ã›ã‚‹ã«ã¯Rã¨ã‹ã®ã»ã†ãŒä¾¿åˆ©ã ã¨æ€ã†ã—ã€‚Rã®ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼ã¯ä¾‹ãˆã°ã“ã‚“ãªé¢¨ã«ã§ãã‚‹ã€‚ R -q -e 'mean(c(1:100)^2)' ã“ã‚Œã¯ã“ã‚Œã§ä¾¿åˆ©ã ã‘ã©ã€ãŸã ã®é›»å“ãªã®ã§ã‚³ãƒžãƒ³ãƒ‰ãƒ©ã‚¤ãƒ³ã‹ã‚‰ä½•ã‹å¼•æ•°ã‚‚ã‚‰ã£ã¦è¨ˆç®—ã•ã›ã‚‹ã“ã¨ã«ã—ãŸã€‚ã¨ã‚Šã‚ãˆãšã‚«ãƒ¬ãƒ³ãƒˆãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªã«ã‚ã‚‹ãƒ•ã‚¡ã‚¤ãƒ«ã®ãƒã‚¤ãƒˆæ•°ã®å¹³å‡ã¨åˆ†æ•£ã‚’Rã«è¨ˆç®—ã•ã›ã¾ã—ãŸï¼žï¼œã€‚ find -type f -printf "%s\n" | xargs R -q -e 'x <- as.numeric(commandArgs()[6:length(commandArgs())]);sprintf("Mean is %5.0f,variance is %10.0f",mean(x),var(x))' --args > x <- as
lesamoureuses 2013/10/18
Rã®ãƒ¯ãƒ³ãƒ©ã‚¤ãƒŠãƒ¼å®Ÿè¡Œã™ã‚‹ã®ã©ã†ã‚„ã‚‹ã‹æŽ¢ã™ãŸã‚ã«helpè¦‹ãŸã‚“ã ã‘ã©è¦‹ã¤ã‘ã‚‰ã‚Œãšã“ã®è¨˜äº‹è¦‹ã¦ã‚‚ã£ã‹ã„helpè¦‹ãŸã‚‰ã¡ã‚ƒã‚“ã¨æ›¸ã„ã¦ã‚ã£ãŸ

r
ãƒªãƒ³ã‚¯
ãƒ‡ãƒ¼ã‚¿ãƒ•ãƒ¬ãƒ¼ãƒ ã®åˆ—ã«å¤‰æ•°ã‚’ä½¿ã£ã¦ã‚¢ã‚¯ã‚»ã‚¹ã™ã‚‹ã¨ãã¯[[]]ã‚’ä½¿ã† - ã“ã‚“ã«ã¡ã¯ã“ã‚“ã«ã¡ã¯monmonã§ã™ï¼
ã‚„ã‚ŠãŸã„ã“ã¨ã¯hogeã¨ã„ã†åˆ—ã‚’ã‚‚ã£ãŸdfrmã¨ã„ã†ãƒ‡ãƒ¼ã‚¿ãƒ•ãƒ¬ãƒ¼ãƒ ãŒã‚ã£ãŸã¨ãã«hogeãŒå…¥ã£ãŸrow_nameã¨ã„ã†å¤‰æ•°ã‚’ä½¿ã£ã¦ã‚¢ã‚¯ã‚»ã‚¹ã—ãŸã„ã¨ã„ã†ã‚‚ã®ã€‚ row_name <- hoge # TODO: row_nameã‚’ä½¿ã£ã¦dfrm$hogeã®ã‚ˆã†ã«ã‚¢ã‚¯ã‚»ã‚¹ã™ã‚‹ã«ã¯ã©ã†ã‚„ã£ã¦æ›¸ã‘ã°ã„ã„ã®ï¼Ÿï¼ ã„ã¤ã‚‚ dfrm$name ã¨ã„ã†ã‚¢ã‚¯ã‚»ã‚¹æ–¹æ³•ã—ã‹ã‚„ã£ãŸã“ã¨ãŒãªãã€Œã“ã‚Œãã£ã¨ã‚·ãƒ³ã‚¿ãƒƒã‚¯ã‚¹ã‚·ãƒ¥ã‚¬ãƒ¼ã§ä½•ã‹ã—ã‚‰æ›¸ãæ–¹ã‚ã‚‹ã‚“ã ã‚ã†ãªãã€ã¨æ€ã£ã¦Rã‚¯ãƒƒã‚¯ãƒ–ãƒƒã‚¯ã‚’ãƒ‘ãƒ©ãƒ‘ãƒ©ã—ãŸã‚‰P.66ã«ã‚ã£ãŸã€‚ 1ã¤ã®åˆ—ã‚’é¸æŠžã™ã‚‹ã«ã¯ã€ä»¥ä¸‹ã®ãƒªã‚¹ãƒˆè¡¨ç¾ã®ã„ãšã‚Œã‹ã‚’ä½¿ã„ã¾ã™ã€‚ dfrm[["name"]] nameã¨ã„ã†åå‰ã®1åˆ—ã‚’è¿”ã—ã¾ã™ã€‚ dfrm$name æ§‹æ–‡ãŒç•°ãªã‚‹ã ã‘ã§ä¸Šè¨˜ã¨åŒã˜ã§ã™ã€‚ ã¨ã„ã†ã“ã¨ã§å…ˆã®å ´åˆã«ã¯ã€ dfrm[[row_name]] ã§ã„ã‘ã¾ã—ãŸã€‚
lesamoureuses 2013/10/18
æ›¸ã„ãŸ

r
ãƒªãƒ³ã‚¯
ã¯ã¦ãªãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯è¨˜äº‹ã®ãƒ¬ã‚³ãƒ¡ãƒ³ãƒ‰ã‚·ã‚¹ãƒ†ãƒ ã‚’ä½œæˆã€€Pythonã«ã‚ˆã‚‹ã¯ã¦ãªAPIã®æ´»ç”¨ã¨Rã«ã‚ˆã‚‹ãƒ¢ãƒ‡ãƒ«ãƒ™ãƒ¼ã‚¹ãƒ¬ã‚³ãƒ¡ãƒ³ãƒ‰ - ãƒ‡ãƒ¼ã‚¿åˆ†æžãŒã—ãŸã„
ç§ã¯æƒ…å ±åŽé›†ã«ã¯ã¦ãªãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã‚’å¤šç”¨ã—ã¦ãŠã‚Šã€æš‡ãªæ™‚ã¯çµæ§‹ãªå‰²åˆã§ã¯ã¦ãªãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã§è¨˜äº‹ã‚’æŽ¢ã—ã¦ã¾ã™ã€‚ã—ã‹ã—ã€ã¯ã¦ãªãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã¯æœ€æ–°ã®è¨˜äº‹ã‚’æŽ¢ã™ã®ã¯ä¾¿åˆ©ã§ã™ãŒã€éŽåŽ»ã®è¨˜äº‹ã‚’æŽ¢ã™ã«ã¯ã„ã¾ã„ã¡ä½¿ãˆã¾ã›ã‚“ã€‚å€‹äººçš„ã«ã¯å¤šå°‘éŽåŽ»ã®è¨˜äº‹ã§ã‚‚è‡ªåˆ†ãŒèˆˆå‘³ã‚’æŒã£ã¦ã„ã‚‹åˆ†é‡Žã«é–¢ã—ã¦ã¯ã€ãƒ¬ã‚³ãƒ¡ãƒ³ãƒ‰ã—ã¦æ¬²ã—ã„ã¨æ„Ÿã˜ã¦ã¾ã™ã€‚ ã‚ã‚ŠãŒãŸã„ã“ã¨ã«ã¯ã¦ãªã¯APIã‚’å…¬é–‹ã—ã¦ãŠã‚Šã€ã¯ã¦ãªãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã®æƒ…å ±ã‚’æ¯”è¼ƒçš„ç°¡å˜ã«å–å¾—ã§ãã¾ã™ã€‚ãã“ã§ã“ã®APIã‚’åˆ©ç”¨ã—ã¦è‡ªåˆ†ã«åˆã£ãŸè¨˜äº‹ã‚’è¦‹ã¤ã‘ã‚‹ã‚ˆã†ãªãƒ¬ã‚³ãƒ¡ãƒ³ãƒ‰æ©Ÿèƒ½ã‚’Rã¨Pythonã§ä½œæˆã—ã¦ã¿ãŸã„ã¨æ€ã„ã¾ã™ã€‚ åˆ©ç”¨ã™ã‚‹ãƒ‡ãƒ¼ã‚¿ã¯ã€ã¯ã¦ãª APIã‚’ä½¿ã£ã¦åŽé›†ã—ã¾ã™ã€‚å…·ä½“çš„ã«ã¯ã€ã¯ã¦ãªãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ãƒ•ã‚£ãƒ¼ãƒ‰ã‚’åˆ©ç”¨ã—ã¦è‡ªåˆ†ã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã—ã¦ã„ã‚‹URLã‚’å–å¾—ã—ã€ãã®URLã‚’ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã—ã¦ã„ã‚‹ãƒ¦ãƒ¼ã‚¶ã‚’ã‚¨ãƒ³ãƒˆãƒªãƒ¼æƒ…å ±å–å¾—APIã‚’ç”¨ã„ã¦æŠ½å‡ºã—ã€ãã®ãƒ¦ãƒ¼ã‚¶ã®ãƒ–ãƒƒã‚¯ãƒžãƒ¼ã‚¯ã—ã¦ã„ã‚‹URLã‚’åŽé›†ã—ã¾ã™ã€‚ã“
lesamoureuses 2013/07/09
æ˜”ä¼¼ãŸã‚ˆã†ãªã“ã¨ã‚„ã£ãŸãªã¨æ€ã£ãŸã‘ã©Rä½¿ã†ã¨ã“ã‚“ãªæ„Ÿã˜ã§ã§ãã‚‹ã‚“ã§ã™ã

python

r

random_forest
ãƒªãƒ³ã‚¯
SSSSLIDE
lesamoureuses 2013/06/06
ã—ã°ã‚‰ãæ›¸ã„ã¦ãªã‹ã£ãŸã‚‰å…¨ç„¶æ€ã„å‡ºã›ãªã‹ã£ãŸ

r

filter
ãƒªãƒ³ã‚¯
Rã§ç°¡å˜ã«HTMLãƒ¬ãƒãƒ¼ãƒˆã‚’é€ã‚Œã‚‹ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ã‚’å…¬é–‹ã—ã¾ã—ãŸ - yokkunsã®æ—¥è¨˜
å…ˆæ—¥ã‚„ã£ãŸRã§HTMLãƒ¬ãƒãƒ¼ãƒˆé…ä¿¡ã‚’ã€ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸åŒ–ã—ã¦å…¬é–‹ã—ã¾ã—ãŸï¼ [R] knitr+sendmailR ã§HTMLãƒ¬ãƒãƒ¼ãƒˆé…ä¿¡ - yokkunsã®æ—¥è¨˜ sendmailRã§ç”»åƒä»˜ãHTMLãƒ¡ãƒ¼ãƒ«ã‚’é€ã‚‹ - yokkunsã®æ—¥è¨˜ Rã§ãƒ¬ãƒãƒ¼ãƒˆãƒ¡ãƒ¼ãƒ« æº–å‚™ ä¿®æ£ç‰ˆsendmailRã®ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ« $ git clone git@github.com:yokkuns/sendmailR.git $ cd sendmailR $ sudo make install ã¾ãŸã¯ã€ãƒ‘ãƒƒã‚±ãƒ¼ã‚¸ã‚’ä½œæˆã—ã¦æ™®é€šã«ã€install.packagesã§ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ« $ make package > install.packages("sendmailR_1.1-2.tar.gz") ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ« > install.packages("EasyHTML Report", contriburl=contrib.
lesamoureuses 2013/03/27
ã“ã‚Œã¯ã„ã„ã§ã™ã

r
ãƒªãƒ³ã‚¯
1