{"title":" \u6210\u9577\u7387\u306e\u8a08\u7b97","blog_url":"https://koiti-yano.hatenablog.com/","author_name":"koiti_yano","width":"100%","image_url":null,"url":"https://koiti-yano.hatenablog.com/entry/2019/10/25/001240","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkoiti-yano.hatenablog.com%2Fentry%2F2019%2F10%2F25%2F001240\" title=\" \u6210\u9577\u7387\u306e\u8a08\u7b97 - \u30cf\u30ea\u30fb\u30bb\u30eb\u30c0\u30f3\u306b\u306a\u308a\u305f\u304f\u3066\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_name":"Hatena Blog","author_url":"https://blog.hatena.ne.jp/koiti_yano/","provider_url":"https://hatena.blog","blog_title":"\u30cf\u30ea\u30fb\u30bb\u30eb\u30c0\u30f3\u306b\u306a\u308a\u305f\u304f\u3066","version":"1.0","published":"2019-10-25 00:12:40","type":"rich","categories":["GNU R"],"description":"\u4ee5\u4e0b\u306b\u6539\u8a02\u7248\u306e\u65e2\u8ff0\u3042\u308a\u3002 \u6210\u9577\u7387\u306e\u8a08\u7b97\uff08\u6539\u8a02\u7248\uff09 - \u30cf\u30ea\u30fb\u30bb\u30eb\u30c0\u30f3\u306b\u306a\u308a\u305f\u304f\u3066\uff08\u306f\u3066\u30c0\u304b\u3089\u79fb\u884c\u4e2d\uff09 R\u3092\u4f7f\u3063\u3066\u6210\u9577\u7387\uff08\uff05\u8868\u793a\uff09\u3092\u8a08\u7b97\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u306e\u5099\u5fd8\u9332\u3002 \u524d\u63d0\uff1atsData\u3092\u30d9\u30af\u30c8\u30eb\u3082\u3057\u304f\u306fts\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3068\u3059\u308b\u3002 \u305d\u306e\uff11\uff1a\u5bfe\u6570\u5dee\u5206 diff(log(tsData))*100 \u30e1\u30ea\u30c3\u30c8\uff1a\u6210\u9577\u7387\u306e\u8fd1\u4f3c\u3067\u3042\u308b\u304c\u3001\u30d7\u30ed\u30b0\u30e9\u30e0\u304c\u7c21\u5358 \u30c7\u30e1\u30ea\u30c3\u30c8\uff1atsData\u306e\u8981\u7d20\u304c\u6b63\u3067\u3042\u308b\u5fc5\u8981\u304c\u3042\u308b\uff08\u305f\u3068\u3048\u3070GDP\u306a\u3089OK\u3001\u5728\u5eab\u5909\u52d5\u306f[\u8ca0\u306b\u306a\u308b\u3053\u3068\u304c\u3042\u308b\u305f\u3081]\u30c0\u30e1\uff09 \u305d\u306e\uff12\uff1a\u5b9a\u7fa9\u901a\u308a\u306b\u6210\u9577\u7387\u3092\u8a08\u7b97\u3059\u308b \u4e00\u884c\u3067\u66f8\u304f\u3068\uff1a numSize <- length(tsData); tsGrowth <- (diff(t\u2026","height":"190"}