Kocyk

Korelacja

Apr 4th, 2022 (edited)
129
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
R 0.83 KB | None | 0 0
  1. menHeight = c(1.93, 1.86, 1.92, 1.82, 1.80, 1.76, 1.89, 1.74, 1.92, 1.72, 1.81, 1.89, 1.81, 1.81, 1.84, 1.86, 1.84, 1.75, 1.86, 1.79)
  2.  
  3. menWeight = c(92, 76, 90, 76, 78, 73, 84, 70, 86, 68, 74, 76, 72, 81, 80, 80, 78, 75, 75, 75)
  4.  
  5. womenHeight = c(1.75, 1.79, 1.75, 1.78, 1.75, 1.69, 1.64, 1.78, 1.73, 1.79, 1.74, 1.71, 1.75, 161, 1.72, 1.71, 1.73, 1.64, 1.63, 1.58, 1.83, 1.70, 1.59, 1.59, 1.64)
  6.  
  7. womenWeight = c(73, 76, 70, 70, 63, 63, 59, 67, 60, 66, 60, 60, 64, 62, 62, 61, 63, 58, 60, 52, 68, 64, 55, 58, 59)
  8.  
  9. plot(menHeight, menWeight, type = 'p')
  10.  
  11. plot(womenHeight, womenWeight, type = 'o')
  12.  
  13. cor(menHeight, menWeight)
  14.  
  15. cor(womenHeight, womenWeight)
  16.  
  17. height = c(menHeight, womenHeight)
  18.  
  19. weight = c(menWeight, womenWeight)
  20.  
  21. plot(height, weight, type = 'h')
  22.  
  23. plot(height, weight, type = 'o')
  24.  
  25. plot(height, weight, type = 's')
Add Comment
Please, Sign In to add comment