Calculate correlation for more than two variables?

Use the same function (cor) on a data frame, e.g.:

> cor(VADeaths)
             Rural Male Rural Female Urban Male Urban Female
Rural Male    1.0000000    0.9979869  0.9841907    0.9934646
Rural Female  0.9979869    1.0000000  0.9739053    0.9867310
Urban Male    0.9841907    0.9739053  1.0000000    0.9918262
Urban Female  0.9934646    0.9867310  0.9918262    1.0000000

Or, on a data frame also holding discrete variables, (also sometimes referred to as factors), try something like the following:

> cor(mtcars[,unlist(lapply(mtcars, is.numeric))])
            mpg        cyl       disp         hp        drat         wt        qsec         vs          am       gear        carb
mpg   1.0000000 -0.8521620 -0.8475514 -0.7761684  0.68117191 -0.8676594  0.41868403  0.6640389  0.59983243  0.4802848 -0.55092507
cyl  -0.8521620  1.0000000  0.9020329  0.8324475 -0.69993811  0.7824958 -0.59124207 -0.8108118 -0.52260705 -0.4926866  0.52698829
disp -0.8475514  0.9020329  1.0000000  0.7909486 -0.71021393  0.8879799 -0.43369788 -0.7104159 -0.59122704 -0.5555692  0.39497686
hp   -0.7761684  0.8324475  0.7909486  1.0000000 -0.44875912  0.6587479 -0.70822339 -0.7230967 -0.24320426 -0.1257043  0.74981247
drat  0.6811719 -0.6999381 -0.7102139 -0.4487591  1.00000000 -0.7124406  0.09120476  0.4402785  0.71271113  0.6996101 -0.09078980
wt   -0.8676594  0.7824958  0.8879799  0.6587479 -0.71244065  1.0000000 -0.17471588 -0.5549157 -0.69249526 -0.5832870  0.42760594
qsec  0.4186840 -0.5912421 -0.4336979 -0.7082234  0.09120476 -0.1747159  1.00000000  0.7445354 -0.22986086 -0.2126822 -0.65624923
vs    0.6640389 -0.8108118 -0.7104159 -0.7230967  0.44027846 -0.5549157  0.74453544  1.0000000  0.16834512  0.2060233 -0.56960714
am    0.5998324 -0.5226070 -0.5912270 -0.2432043  0.71271113 -0.6924953 -0.22986086  0.1683451  1.00000000  0.7940588  0.05753435
gear  0.4802848 -0.4926866 -0.5555692 -0.1257043  0.69961013 -0.5832870 -0.21268223  0.2060233  0.79405876  1.0000000  0.27407284
carb -0.5509251  0.5269883  0.3949769  0.7498125 -0.09078980  0.4276059 -0.65624923 -0.5696071

Related Posts:

  1. How do I select the first row in an R data frame that meets certain criteria?
  2. Poker hand range chart visualization in R
  3. Error in plot.new() : figure margins too large, Scatter plot
  4. How to join (merge) data frames (inner, outer, left, right)
  5. rbind error: “names do not match previous names”
  6. rbind error: “names do not match previous names”
  7. $ operator is invalid for atomic vectors for dataframe R
  8. adding x and y axis labels in ggplot2
  9. Set NA to 0 in R
  10. R: Using equation with natural logarithm in nls
  11. kmeans complains “NA/NaN/Inf in foreign function call (arg 1)”, when there are none?
  12. Why use as.factor() instead of just factor()
  13. Update R using RStudio
  14. mean() warning: argument is not numeric or logical: returning NA
  15. ‘x’ and ‘y’ lengths differ ERROR when plotting
  16. What does “Error: object ‘‘ not found” mean?
  17. mean() warning: argument is not numeric or logical: returning NA
  18. Difference between paste() and paste0()
  19. How do I delete rows in a data frame?
  20. Error in grid.Call(L_textBounds, as.graphicsAnnot(x$label), x$x, x$y, : Polygon edge not found
  21. Drop data frame columns by name
  22. Having trouble setting working directory
  23. How to find the statistical mode?
  24. How can two strings be concatenated?
  25. Error in colMeans(x, na.rm = TRUE) : ‘x’ must be numeric in KNN classification
  26. Error in ggplot.data.frame : Mapping should be created with aes or aes_string
  27. SummarySE (Rmisc package) to produce a barplot with error bars (ggplot2)
  28. Remove a row from a data table in R
  29. Add color to boxplot – “Continuous value supplied to discrete scale” error
  30. Error in plot.window(…) : need finite ‘xlim’ valuescc
  31. “Error: Continuous value supplied to discrete scale” in default data set example mtcars and ggplot2
  32. Logistic Regression on factor: Error in eval(family$initialize) : y values must be 0 <= y <= 1
  33. Error: Incorrect number of dimensions in R
  34. cannot coerce type ‘closure’ to vector of type ‘character’
  35. Basic – T-Test -> Grouping Factor Must have Exactly 2 Levels
  36. Error: attempt to use zero-length variable name
  37. How does one reorder columns in a data frame?
  38. R error: cannot coerce type ‘closure’ to vector of type ‘double’
  39. scale_color_manual() not working
  40. Error in lm.fit(x, y, offset = offset, singular.ok = singular.ok, …) 0 non-na cases
  41. Clear R environment of all objetcs & packages
  42. Why I get this error writing data to a file
  43. How to save a data frame as CSV to a user selected location using tcltk
  44. Subscript out of bounds – general definition and solution?
  45. R: Error in eval(predvars, data, env) : numeric ‘envir’ arg not of length one in intrinsic.pars() in multgee package
  46. Convert a list to a data frame
  47. How to count the number of observations in R like Stata command count
  48. Remove all of x axis labels in ggplot
  49. Create an empty data.frame
  50. Can’t draw Histogram, ‘x’ must be numeric
  51. How can I plot data with confidence intervals?
  52. MLE error in R: initial value in ‘vmmin’ is not finite
  53. Rename multiple columns by names
  54. Unimplemented type list when trying to write.table
  55. What is the difference between rm() and rm(list=ls())?
  56. Remove rows with all or some NAs (missing values) in data.frame
  57. Subscript out of bounds – general definition and solution?
  58. Convert date-time string to class Date
  59. Linear model function lm() error: NA/NaN/Inf in foreign function call (arg 1)
  60. Reshaping data.frame from wide to long format
  61. Remove rows with all or some NAs (missing values) in data.frame
  62. How to set limits for axes in ggplot2 R plots?
  63. duplicate ‘row.names’ are not allowed error
  64. predict.lm() in a loop. warning: prediction from a rank-deficient fit may be misleading
  65. Nested ifelse statement
  66. Convert categorical variables to numeric in R
  67. How do I get RSS from a linear model output
  68. Warning message: In `…` : invalid factor level, NA generated
  69. Mean of a column in a data frame, given the column’s name
  70. How to overcome error:”attempt to set ‘colnames’ on an object with less than two dimension” in xts object
  71. grep using a character vector with multiple patterns
  72. remove all variables except functions
  73. Error: Invalid input: date_trans works with objects of class Date only
  74. How to avoid “Error in stripchart.default(x1, …) : invalid plotting method” error?
  75. Matrix expression causes error “requires numeric/complex matrix/vector arguments”?
  76. ‘height’ must be a vector or a matrix. barplot error
  77. NAs are not allowed in subscripted assignments
  78. install.packages fails in knitr document: “trying to use CRAN without setting a mirror”
  79. How to convert a data frame column to numeric type?
  80. How do I install an R package from source?
  81. How can I convert Json to data frame in R
  82. Optimization of a function in R ( L-BFGS-B needs finite values of ‘fn’)
  83. Error in eval(predvars, data, env) : invalid ‘envir’ argument of type ‘character’
  84. Error in : target of assignment expands to non-language object
  85. run a for loop in parallel in R
  86. How do I combine two data-frames based on two columns?
  87. Efficiently sum across multiple columns in R
  88. How to eliminate “NA/NaN/Inf in foreign function call (arg 7)” running predict with randomForest
  89. Indicator function in R
  90. IF “OR” multiple conditions
  91. R4DS error comparison (1) is possible only for atomic and list types
  92. Replace all 0 values to NA
  93. Error in x[[i]] : recursive indexing failed at level 2
  94. non-numeric argument to binary operator
  95. How to avoid “operations are possible only for numeric, logical or complex types” when computing top 3 elements in each group
  96. Column standard deviation R [duplicate]
  97. Difference between as.POSIXct/as.POSIXlt and strptime for converting character vectors to POSIXct/POSIXlt
  98. invalid (do_set) left-hand side to assignment in R
  99. How do I print a hexadecimal number with leading 0 to have width 2 using sprintf?
  100. In R, dealing with Error: ggplot2 doesn’t know how to deal with data of class numeric

Leave a Comment