çµ±è¨APIã®è©¦é¨éç¨ãå§ã¾ã£ãã¨ãããã¨ã§ãRãã使ã£ã¦ã¿ãã®ã§ã¡ã¢ã èªæ²»ä½ç¬èªã®çµ±è¨ããã®å½¢å¼ã«æºæ ã§ããã°ããããã 次ä¸ä»£çµ±è¨å©ç¨ã·ã¹ãã http://statdb.nstac.go.jp/ 使ã£ãã©ã¤ãã©ãªã¯ä»¥ä¸ã®4ã¤ã library(RCurl) library(rjson) library(XML) library(ggplot2) çµ±è¨è¡¨æ¤ç´¢ã®ããã®é¢æ°ã optionsã«ã¯ãæ¤ç´¢ãã©ã¡ã¼ã¿åã¨å¤ã®çµã®ãªã¹ããä¸ããã appIdã¯ãµã¤ãã§ç»é²ãã¦åå¾ã getStatList <- function(options){ appId <- "hogehoge" URL <- "http://statdb.nstac.go.jp/rest/1.0/app/getStatsList?" appIdstring <- paste("appId", appId, sep="="
{{#tags}}- {{label}}
{{/tags}}