{"id":3079,"date":"2023-07-19T07:37:25","date_gmt":"2023-07-19T07:37:25","guid":{"rendered":"https:\/\/statorials.org\/ko\/r%e1%84%8b%e1%85%b4-%e1%84%89%e1%85%a1%e1%86%ab%e1%84%8c%e1%85%a5%e1%86%b7%e1%84%83%e1%85%a9-%e1%84%92%e1%85%a2%e1%86%bc%e1%84%85%e1%85%a7%e1%86%af\/"},"modified":"2023-07-19T07:37:25","modified_gmt":"2023-07-19T07:37:25","slug":"r%e1%84%8b%e1%85%b4-%e1%84%89%e1%85%a1%e1%86%ab%e1%84%8c%e1%85%a5%e1%86%b7%e1%84%83%e1%85%a9-%e1%84%92%e1%85%a2%e1%86%bc%e1%84%85%e1%85%a7%e1%86%af","status":"publish","type":"post","link":"https:\/\/statorials.org\/ko\/r%e1%84%8b%e1%85%b4-%e1%84%89%e1%85%a1%e1%86%ab%e1%84%8c%e1%85%a5%e1%86%b7%e1%84%83%e1%85%a9-%e1%84%92%e1%85%a2%e1%86%bc%e1%84%85%e1%85%a7%e1%86%af\/","title":{"rendered":"R\uc5d0\uc11c \uc0b0\uc810\ub3c4 \ud589\ub82c\uc744 \ub9cc\ub4dc\ub294 \ubc29\ubc95(\uc608\uc81c 2\uac1c)"},"content":{"rendered":"

<\/p>\n

\n

\uc0b0\uc810\ub3c4 \ud589\ub82c\uc740<\/strong> \ub370\uc774\ud130 \uc138\ud2b8\uc758 \uc11c\ub85c \ub2e4\ub978 \ubcc0\uc218 \uac04\uc758 \uc30d\ubcc4 \uad00\uacc4\ub97c \uc774\ud574\ud560 \uc218 \uc788\ub294 \uc0b0\uc810\ub3c4 \ud589\ub82c\uc785\ub2c8\ub2e4.<\/span><\/p>\n

R\uc5d0\uc11c \uc0b0\uc810\ub3c4 \ud589\ub82c\uc744 \uc0dd\uc131\ud558\ub294 \ub450 \uac00\uc9c0 \uc77c\ubc18\uc801\uc778 \ubc29\ubc95\uc774 \uc788\uc2b5\ub2c8\ub2e4.<\/span><\/p>\n

\ubc29\ubc95 1: \uae30\ubcf8 R \uc0ac\uc6a9<\/strong><\/span><\/p>\n

 #create scatterplot matrix (pch=20 means to use a solid circle for points)<\/span>\nplot(df, pch= 20<\/span> )\n<\/strong><\/pre>\n
 \ubc29\ubc95 2: ggplot2 \ubc0f GGally \ud328\ud0a4\uc9c0 \uc0ac\uc6a9<\/strong><\/span><\/p>\n
 library<\/span> (ggplot2)\nlibrary<\/span> (GGally)\n\n#create scatterplot matrix\n<\/span>ggpairs(df)<\/strong><\/pre>\n
 \ub2e4\uc74c \uc608\uc5d0\uc11c\ub294 R\uc758 \ub2e4\uc74c \ub370\uc774\ud130 \ud504\ub808\uc784\uc744 \uc0ac\uc6a9\ud558\uc5ec \uc2e4\uc81c\ub85c \uac01 \uba54\uc11c\ub4dc\ub97c \uc0ac\uc6a9\ud558\ub294 \ubc29\ubc95\uc744 \ubcf4\uc5ec\uc90d\ub2c8\ub2e4.<\/span><\/p>\n
 #create data frame\n<\/span>df <- data. frame<\/span> (points=c(99, 90, 86, 88, 95, 99, 101, 104),\n                 assists=c(33, 28, 31, 39, 40, 40, 35, 47),\n                 rebounds=c(30, 28, 24, 24, 20, 20, 15, 12))\n\n#view first few rows of data frame\n<\/span>head(df)\n\n  points assists rebounds\n1 99 33 30\n2 90 28 28\n3 86 31 24\n4 88 39 24\n5 95 40 20\n6 99 40 20\n<\/strong><\/pre>\n
 \uc608\uc81c 1: \uae30\ubcf8 R\uc744 \uc0ac\uc6a9\ud558\uc5ec \uc0b0\uc810\ub3c4 \ud589\ub82c \uc0dd\uc131<\/strong><\/span><\/h3>\n
 \uae30\ubcf8 R \ud50c\ub86f()<\/strong> \ud568\uc218\ub97c \uc0ac\uc6a9\ud558\uc5ec \ub370\uc774\ud130 \ud504\ub808\uc784\uc758 \uac01 \ubcc0\uc218\uc5d0 \ub300\ud55c \uc0b0\uc810\ub3c4 \ud589\ub82c\uc744 \ub9cc\ub4e4 \uc218 \uc788\uc2b5\ub2c8\ub2e4.<\/span> <\/p>\n
 #create scatterplot matrix\nplot(df, pch= 20<\/span> , cex= 1.5<\/span> , col=' steelblue<\/span> ')<\/span>\n<\/span><\/strong><\/pre>\n
\"R\uc758<\/p>\n
 \ud589\ub82c\uc744 \ud574\uc11d\ud558\ub294 \ubc29\ubc95\uc740 \ub2e4\uc74c\uacfc \uac19\uc2b5\ub2c8\ub2e4.<\/span><\/p>\n