{"id":438,"date":"2019-06-26T21:18:41","date_gmt":"2019-06-26T12:18:41","guid":{"rendered":"https:\/\/best-biostatistics.com\/toukei-er\/entry\/how-to-calculate-euclidean-distance-in-r\/"},"modified":"2024-10-10T23:02:53","modified_gmt":"2024-10-10T14:02:53","slug":"how-to-calculate-euclidean-distance-in-r","status":"publish","type":"post","link":"https:\/\/best-biostatistics.com\/toukei-er\/entry\/how-to-calculate-euclidean-distance-in-r\/","title":{"rendered":"R \u3067\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u3092\u6c42\u3081\u308b\u65b9\u6cd5"},"content":{"rendered":"\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u306f\u7d00\u5143\u524d325\u5e74\u306b\u751f\u307e\u308c\u305f\u30ae\u30ea\u30b7\u30e3\u306e\u6570\u5b66\u8005\u3002<\/p>\n\n\n\n

\u8457\u3057\u305f\u8457\u66f8\u306f\u6570\u5b66\u306e\u306a\u304b\u3067\u3082\u7279\u306b\u5e7e\u4f55\u5b66\u306e\u6559\u79d1\u66f8\u3068\u3057\u3066\u6709\u540d\u3067\u3042\u3063\u305f\u3002<\/p>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u304c\u8003\u3048\u51fa\u3057\u305f\u300c\u8ddd\u96e2\u300d\u3068\u306f\uff1f<\/p>\n\n\n\n\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u3068\u306f\uff1f<\/h2>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u306f\u3001\u5e7e\u4f55\u5b66\u3067\u6271\u3046\u4e8b\u9805\u3067\u3042\u308b\u3002<\/p>\n\n\n\n

\u5e7e\u4f55\u5b66\u3068\u306f\u56f3\u5f62\u3092\u6271\u3046\u6570\u5b66\u306e\u4e2d\u306e\u4e00\u5206\u91ce\u3060\u3002<\/p>\n\n\n\n

\u767d\u7d19\u306b\u66f8\u3044\u305f\u3042\u308b\u70b9\u3068\u3082\u3046\u4e00\u3064\u306e\u70b9\u306e\u8ddd\u96e2\u306a\u3069\u3092\u8003\u3048\u308b\u5b66\u554f\u3067\u3042\u308b\u3002<\/p>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u306f\u305d\u306e\u70b9\u3068\u70b9\u306e\u8ddd\u96e2\u3092\u6570\u5024\u3067\u8868\u3057\u305f\u3082\u306e\u3060\u3002<\/p>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u3092\u4e00\u8a00\u3067\u8868\u3059\u3068\u3001\u70b9\u3068\u70b9\u306e\u300c\u5dee\u306e\u4e8c\u4e57\u548c\u306e\u5e73\u65b9\u6839\u300d\u3067\u3042\u308b\u3002<\/p>\n\n\n\n

\u5b9f\u4f8b\u3067\u3001\u70b9\u3068\u70b9\u306e\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u3092\u898b\u3066\u307f\u3088\u3046\u3002<\/p>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u306e\u6c42\u3081\u65b9\u5b9f\u4f8b<\/h2>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u8a08\u7b97\u306e\u5b9f\u4f8b\u3068\u3057\u3066\u3001\u7d71\u8a08\u30bd\u30d5\u30c8R\u306b\u6700\u521d\u304b\u3089\u542b\u307e\u308c\u3066\u3044\u308b USArrests \u3068\u3044\u3046\u30c7\u30fc\u30bf\u3092\u7528\u3044\u308b\u3002<\/p>\n\n\n\n

\u3053\u308c\u306f1973\u5e74\u5f53\u6642\u306e\u30a2\u30e1\u30ea\u30ab50\u5dde\u306e10\u4e07\u4eba\u5f53\u305f\u308a\u306e\u72af\u7f6a\u306b\u3088\u308b\u902e\u6355\u8005\u7387\u306e\u30c7\u30fc\u30bf\u3067\u3042\u308b\u3002<\/p>\n\n\n\n

\u3053\u306e\u30c7\u30fc\u30bf\u3092\u7528\u3044\u3066\u3001\u5dde\u3068\u5dde\u306e\u9593\u306e\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u3092\u6c42\u3081\u3066\u307f\u308b\u3002<\/p>\n\n\n\n

\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u8a08\u7b97\u306e\u30b5\u30f3\u30d7\u30eb\u30c7\u30fc\u30bf<\/h3>\n\n\n\n

\u5148\u982d\u306e6\u884c\u3092\u898b\u3066\u307f\u308b\u3068\u4ee5\u4e0b\u306e\u901a\u308a\u3002<\/p>\n\n\n\n

\u305d\u308c\u305e\u308c\u306e\u5dde\u306e\u69d8\u5b50\uff08\u7279\u5fb4\uff09\u30924\u3064\u306e\u8981\u56e0\uff08Murder, Assault, UrbanPop, Rape\uff09\u3067\u898f\u5b9a\u3057\u3066\u3044\u308b\u3002<\/p>\n\n\n\n

><\/span> head<\/span>(<\/span>USArrests)<\/span>\nMurder Assault UrbanPop Rape\nAlabama      13.2<\/span>     236<\/span>       58<\/span> 21.2<\/span>\nAlaska       10.0<\/span>     263<\/span>       48<\/span> 44.5<\/span>\nArizona       8.1<\/span>     294<\/span>       80<\/span> 31.0<\/span>\nArkansas      8.8<\/span>     190<\/span>       50<\/span> 19.5<\/span>\nCalifornia    9.0<\/span>     276<\/span>       91<\/span> 40.6<\/span>\nColorado      7.9<\/span>     204<\/span>       78<\/span> 38.7<\/span>\n<\/code><\/pre>\n\n\n\n
\u3053\u306e4\u3064\u306e\u8981\u56e0\u3067\u3001\u4f8b\u3048\u3070 Alabama \u3068 Alaska \u306e\u300c\u8ddd\u96e2\u300d\u3092\u8a08\u7b97\u3057\u3066\u307f\u308b\u3002<\/p>\n\n\n\n
2 \u3064\u3067\u3042\u308c\u3070\u5e73\u9762\u30013 \u3064\u3067\u3042\u308c\u3070\u7acb\u4f53\u3067\u8ddd\u96e2\u3092\u56f3\u793a\u3059\u308b\u3053\u3068\u306f\u3067\u304d\u308b\u304c\u30014\u3064\u306e\u8981\u56e0\u306b\u306a\u308b\u3068\u3001\u3082\u306f\u3084\u56f3\u3067\u8868\u3059\u3053\u3068\u306f\u3067\u304d\u306a\u3044\u3002<\/p>\n\n\n\n
\u306a\u306e\u3067\u3001\u5b8c\u5168\u306b\u60f3\u50cf\u306e\u4e16\u754c\u306b\u306a\u3063\u3066\u3057\u307e\u3046\u3002<\/p>\n\n\n\n
\u3082\u3057\u304f\u306f\u8a08\u7b97\u3060\u3051\u306e\u4e16\u754c\u3060\u3002<\/p>\n\n\n\n
\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u3092\u5b9f\u969b\u306b\u3069\u3046\u3084\u3063\u3066\u8a08\u7b97\u3059\u308b\u304b\uff1f<\/h3>\n\n\n\n
\u307e\u305a\u306f\u3001Alabama\u3068Alaska\u306e\u30c7\u30fc\u30bf\u3060\u3051\u3092\u629c\u304d\u51fa\u3059\u3002<\/p>\n\n\n\n
><\/span> USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),]<\/span>\nMurder Assault UrbanPop Rape\nAlabama   13.2<\/span>     236<\/span>       58<\/span> 21.2<\/span>\nAlaska    10.0<\/span>     263<\/span>       48<\/span> 44.5<\/span>\n<\/code><\/pre>\n\n\n\n
\u6b21\u306b1\u884c\u76ee\u306eAlabama\u304b\u30892\u884c\u76ee\u306eAlaska\u306b\u5bfe\u3057\u3066\u30014\u3064\u306e\u8981\u56e0\u3067\u305d\u308c\u305e\u308c\u5f15\u304d\u7b97\u3092\u3059\u308b\u3002<\/p>\n\n\n\n
><\/span> USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>1<\/span>,]<\/span>-<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>2<\/span>,]<\/span>\nMurder Assault UrbanPop  Rape\nAlabama    3.2<\/span>     -<\/span>27<\/span>       10<\/span> -<\/span>23.3<\/span>\n<\/code><\/pre>\n\n\n\n
\u305d\u306e\u5dee\u3092\u4e8c\u4e57\u3059\u308b\u3002<\/p>\n\n\n\n
><\/span> (<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>1<\/span>,]<\/span>-<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>2<\/span>,])<\/span>^<\/span>2<\/span>\nMurder Assault UrbanPop   Rape\nAlabama  10.24<\/span>     729<\/span>      100<\/span> 542.89<\/span>\n<\/code><\/pre>\n\n\n\n
\u5408\u8a08\uff08\u3064\u307e\u308a\u548c\uff09\u3092\u8a08\u7b97\u3059\u308b\u3002<\/p>\n\n\n\n
><\/span> sum<\/span>((<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>1<\/span>,]<\/span>-<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>2<\/span>,])<\/span>^<\/span>2<\/span>)<\/span>\n[<\/span>1<\/span>]<\/span> 1382.13<\/span>\n<\/code><\/pre>\n\n\n\n
\u6700\u5f8c\u306b\u5e73\u65b9\u6839\u306b\u3059\u308b\u3068\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u306b\u306a\u308b\u3002<\/p>\n\n\n\n
><\/span> sqrt<\/span>(<\/span>sum<\/span>((<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>1<\/span>,]<\/span>-<\/span>USArrests[<\/span>c<\/span>(<\/span>1<\/span>,<\/span>2<\/span>),][<\/span>2<\/span>,])<\/span>^<\/span>2<\/span>))<\/span>\n[<\/span>1<\/span>]<\/span> 37.17701<\/span>\n<\/code><\/pre>\n\n\n\n
\u3053\u306e\u6570\u5b57\u81ea\u4f53\u304c\u4f55\u3092\u793a\u3057\u3066\u3044\u308b\u304b\u306f\u6c17\u306b\u3057\u306a\u304f\u3066\u3088\u3044\u3002<\/p>\n\n\n\n
\u305f\u3060\u3001\u6570\u5b57\u306e\u5927\u5c0f\u306b\u3088\u3063\u3066\u3069\u306e\u5dde\u540c\u58eb\u304c\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u304c\u5c0f\u3055\u3044\u306e\u304b\u5927\u304d\u3044\u306e\u304b\u3001\u8fd1\u3044\u306e\u304b\u9060\u3044\u306e\u304b\u3001\u3064\u307e\u308a\u3001\u4f3c\u3066\u3044\u308b\u306e\u304b\u4f3c\u3066\u3044\u306a\u3044\u306e\u304b\u306e\u5224\u65ad\u6750\u6599\u306b\u306a\u308b\u3068\u3044\u3046\u3053\u3068\u3068\u7406\u89e3\u3059\u308b\u3002<\/p>\n\n\n\n
\u5b9f\u306f\u3001\u3053\u306e\u8ddd\u96e2\u3092\u7528\u3044\u3066\u968e\u5c64\u578b\u30af\u30e9\u30b9\u30bf\u30ea\u30f3\u30b0\u306b\u3088\u308b\u30af\u30e9\u30b9\u30bf\u30fc\u5206\u6790\u304c\u884c\u308f\u308c\u3066\u3044\u308b\u3002<\/p>\n\n\n
\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\u3042\u308f\u305b\u3066\u8aad\u307f\u305f\u3044<\/span>\n\t\t\t\t\t
\"\"<\/figure><\/div>\t\t\t\t\t
\n\t\t\t\t\t\t\u30af\u30e9\u30b9\u30bf\u30fc\u5206\u6790\u3068\u306f\uff1f<\/a>\n\t\t\t\t\t\t\u30af\u30e9\u30b9\u30bf\u30fc\u5206\u6790\u3068\u306f\u4f55\u304b\uff1f \u305d\u3082\u305d\u3082\u3001\u30af\u30e9\u30b9\u30bf\u30fc\u3063\u3066\u4f55\uff1f \u30af\u30e9\u30b9\u30bf\u30fc\u3068\u306f\uff1f \u30af\u30e9\u30b9\u30bf\u30fc\u3068\u306f\u3001\u30b0\u30eb\u30fc\u30d7\u3068\u304b\u584a\uff08\u304b\u305f\u307e\u308a\uff09\u306e\u610f\u5473\u3002 \u30c7\u30fc\u30bf\u3092\u3044\u304f\u3064\u304b\u306e\u584a\u306b\u5206\u3051\u305f\u3082\u306e\u3092…<\/span>\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t<\/div>\n\t\t<\/div>\n\n\n
\u968e\u5c64\u578b\u30af\u30e9\u30b9\u30bf\u30ea\u30f3\u30b0\u306e\u5b9f\u4f8b\u306f\u4ee5\u4e0b\u306e\u8a18\u4e8b\u3092\u53c2\u7167\u3002<\/p>\n\n\n
\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\u3042\u308f\u305b\u3066\u8aad\u307f\u305f\u3044<\/span>\n\t\t\t\t\t
\"\"<\/figure><\/div>\t\t\t\t\t
\n\t\t\t\t\t\tR \u3067\u968e\u5c64\u7684\u30af\u30e9\u30b9\u30bf\u30ea\u30f3\u30b0\u3092\u884c\u3046\u65b9\u6cd5<\/a>\n\t\t\t\t\t\tR \u3067\u968e\u5c64\u7684\u30af\u30e9\u30b9\u30bf\u30ea\u30f3\u30b0\u3092\u884c\u3046\u65b9\u6cd5\u3002 \u968e\u5c64\u7684\u30af\u30e9\u30b9\u30bf\u30ea\u30f3\u30b0\u3068\u306f \u3055\u307e\u3056\u307e\u306a\u7279\u5fb4\u3092\u6301\u3063\u305f\u96c6\u56e3\u3001\u305f\u3068\u3048\u3070\u7c73\u56fd50\u5dde\u3092\u3001\u7279\u5fb4\u304c\u4f3c\u3066\u3044\u308b\u4f3c\u3066\u3044\u306a\u3044\u3067\u8fd1\u3044\u30fb\u9060\u3044\u3092\u8868\u73fe\u3057\u3066…<\/span>\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t<\/div>\n\t\t<\/div>\n\n\n\n\n\n\n
\uff1e\uff1e\u3082\u3046\u7d71\u8a08\u3067\u60a9\u3080\u306e\u306f\u7d42\u308f\u308a\u306b\u3057\u307e\u305b\u3093\u304b\uff1f\u00a0<\/a><\/strong><\/span><\/p>\r\n\"\"<\/a>\r\n
\u21911\u4e07\u4eba\u4ee5\u4e0a\u306e\u533b\u7642\u5f93\u4e8b\u8005\u304c\u8cfc\u8aad\u4e2d<\/span><\/strong><\/span><\/p><\/div>
\u307e\u3068\u3081<\/h2>\n\n\n\n
\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u8ddd\u96e2\u306f\u3001\u4e8c\u6b21\u5143\u4ee5\u4e0a\u306e\u70b9\u540c\u58eb\u306e\u8ddd\u96e2\u3092\u8868\u73fe\u3057\u305f\u3082\u306e\u3060\u3002<\/p>\n\n\n\n
\u8a08\u7b97\u65b9\u6cd5\u306f\u3001\u300c\u5dee\u306e\u4e8c\u4e57\u548c\u306e\u5e73\u65b9\u6839\u300d\u3067\u3042\u308b\u3002<\/p>\n\n\n\n
\u3053\u306e\u8ddd\u96e2\u304c\u5927\u304d\u3044\u304b\u5c0f\u3055\u3044\u304b\u3067\u3001\u9060\u3044\u304b\u8fd1\u3044\u304b\u3092\u5224\u65ad\u3057\u3001\u4f3c\u3066\u3044\u306a\u3044\u30fb\u4f3c\u3066\u3044\u308b\u3068\u3044\u3046\u5224\u5b9a\u306b\u3064\u306a\u3052\u308b\u3053\u3068\u304c\u3067\u304d\u308b\u3002<\/p>\n\n\n\n
\u53c2\u8003\u306b\u306a\u308c\u3070\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"
\u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u306f\u7d00\u5143\u524d325\u5e74\u306b\u751f\u307e\u308c\u305f\u30ae\u30ea\u30b7\u30e3\u306e\u6570\u5b66\u8005\u3002 \u8457\u3057\u305f\u8457\u66f8\u306f\u6570\u5b66\u306e\u306a\u304b\u3067\u3082\u7279\u306b\u5e7e\u4f55\u5b66\u306e\u6559\u79d1\u66f8\u3068\u3057\u3066\u6709\u540d\u3067\u3042\u3063\u305f\u3002 \u30e6\u30fc\u30af\u30ea\u30c3\u30c9\u304c\u8003\u3048\u51fa\u3057\u305f\u300c\u8ddd\u96e2\u300d\u3068\u306f\uff1f<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"swell_btn_cv_data":"","_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[5,107,127],"tags":[],"class_list":["post-438","post","type-post","status-publish","format-standard","hentry","category-r","category-107","category-127"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/438","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/comments?post=438"}],"version-history":[{"count":2,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/438\/revisions"}],"predecessor-version":[{"id":2628,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/438\/revisions\/2628"}],"wp:attachment":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/media?parent=438"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/categories?post=438"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/tags?post=438"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}