library(tidyverse)
## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr     1.1.4     ✔ readr     2.1.4
## ✔ forcats   1.0.0     ✔ stringr   1.5.0
## ✔ ggplot2   3.4.2     ✔ tibble    3.2.1
## ✔ lubridate 1.9.2     ✔ tidyr     1.3.0
## ✔ purrr     1.0.1     
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag()    masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
library(datasets)
library(vctrs)
## 
## Attaching package: 'vctrs'
## 
## The following object is masked from 'package:dplyr':
## 
##     data_frame
## 
## The following object is masked from 'package:tibble':
## 
##     data_frame
data("CO2")
view(CO2)
CO2 <- tibble::as.tibble(CO2)
## Warning: `as.tibble()` was deprecated in tibble 2.0.0.
## ℹ Please use `as_tibble()` instead.
## ℹ The signature and semantics have changed, see `?as_tibble`.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.
class(CO2)
## [1] "tbl_df"     "tbl"        "data.frame"
view(CO2)
glimpse(CO2)
## Rows: 84
## Columns: 5
## $ Plant     <ord> Qn1, Qn1, Qn1, Qn1, Qn1, Qn1, Qn1, Qn2, Qn2, Qn2, Qn2, Qn2, …
## $ Type      <fct> Quebec, Quebec, Quebec, Quebec, Quebec, Quebec, Quebec, Queb…
## $ Treatment <fct> nonchilled, nonchilled, nonchilled, nonchilled, nonchilled, …
## $ conc      <dbl> 95, 175, 250, 350, 500, 675, 1000, 95, 175, 250, 350, 500, 6…
## $ uptake    <dbl> 16.0, 30.4, 34.8, 37.2, 35.3, 39.2, 39.7, 13.6, 27.3, 37.1, …
head(CO2)
## # A tibble: 6 × 5
##   Plant Type   Treatment   conc uptake
##   <ord> <fct>  <fct>      <dbl>  <dbl>
## 1 Qn1   Quebec nonchilled    95   16  
## 2 Qn1   Quebec nonchilled   175   30.4
## 3 Qn1   Quebec nonchilled   250   34.8
## 4 Qn1   Quebec nonchilled   350   37.2
## 5 Qn1   Quebec nonchilled   500   35.3
## 6 Qn1   Quebec nonchilled   675   39.2
mean(CO2$uptake) == CO2$conc %>% mean()
## [1] FALSE
#SUMMARIZE
CO2 %>% group_by(Plant) %>% summarize(mean=mean(uptake)) #summarize average from each variable
## # A tibble: 12 × 2
##    Plant  mean
##    <ord> <dbl>
##  1 Qn1    33.2
##  2 Qn2    35.2
##  3 Qn3    37.6
##  4 Qc1    30.0
##  5 Qc3    32.6
##  6 Qc2    32.7
##  7 Mn3    24.1
##  8 Mn2    27.3
##  9 Mn1    26.4
## 10 Mc2    12.1
## 11 Mc3    17.3
## 12 Mc1    18
CO2 %>% arrange(conc) %>% print(n=84) #smallest to biggest
## # A tibble: 84 × 5
##    Plant Type        Treatment   conc uptake
##    <ord> <fct>       <fct>      <dbl>  <dbl>
##  1 Qn1   Quebec      nonchilled    95   16  
##  2 Qn2   Quebec      nonchilled    95   13.6
##  3 Qn3   Quebec      nonchilled    95   16.2
##  4 Qc1   Quebec      chilled       95   14.2
##  5 Qc2   Quebec      chilled       95    9.3
##  6 Qc3   Quebec      chilled       95   15.1
##  7 Mn1   Mississippi nonchilled    95   10.6
##  8 Mn2   Mississippi nonchilled    95   12  
##  9 Mn3   Mississippi nonchilled    95   11.3
## 10 Mc1   Mississippi chilled       95   10.5
## 11 Mc2   Mississippi chilled       95    7.7
## 12 Mc3   Mississippi chilled       95   10.6
## 13 Qn1   Quebec      nonchilled   175   30.4
## 14 Qn2   Quebec      nonchilled   175   27.3
## 15 Qn3   Quebec      nonchilled   175   32.4
## 16 Qc1   Quebec      chilled      175   24.1
## 17 Qc2   Quebec      chilled      175   27.3
## 18 Qc3   Quebec      chilled      175   21  
## 19 Mn1   Mississippi nonchilled   175   19.2
## 20 Mn2   Mississippi nonchilled   175   22  
## 21 Mn3   Mississippi nonchilled   175   19.4
## 22 Mc1   Mississippi chilled      175   14.9
## 23 Mc2   Mississippi chilled      175   11.4
## 24 Mc3   Mississippi chilled      175   18  
## 25 Qn1   Quebec      nonchilled   250   34.8
## 26 Qn2   Quebec      nonchilled   250   37.1
## 27 Qn3   Quebec      nonchilled   250   40.3
## 28 Qc1   Quebec      chilled      250   30.3
## 29 Qc2   Quebec      chilled      250   35  
## 30 Qc3   Quebec      chilled      250   38.1
## 31 Mn1   Mississippi nonchilled   250   26.2
## 32 Mn2   Mississippi nonchilled   250   30.6
## 33 Mn3   Mississippi nonchilled   250   25.8
## 34 Mc1   Mississippi chilled      250   18.1
## 35 Mc2   Mississippi chilled      250   12.3
## 36 Mc3   Mississippi chilled      250   17.9
## 37 Qn1   Quebec      nonchilled   350   37.2
## 38 Qn2   Quebec      nonchilled   350   41.8
## 39 Qn3   Quebec      nonchilled   350   42.1
## 40 Qc1   Quebec      chilled      350   34.6
## 41 Qc2   Quebec      chilled      350   38.8
## 42 Qc3   Quebec      chilled      350   34  
## 43 Mn1   Mississippi nonchilled   350   30  
## 44 Mn2   Mississippi nonchilled   350   31.8
## 45 Mn3   Mississippi nonchilled   350   27.9
## 46 Mc1   Mississippi chilled      350   18.9
## 47 Mc2   Mississippi chilled      350   13  
## 48 Mc3   Mississippi chilled      350   17.9
## 49 Qn1   Quebec      nonchilled   500   35.3
## 50 Qn2   Quebec      nonchilled   500   40.6
## 51 Qn3   Quebec      nonchilled   500   42.9
## 52 Qc1   Quebec      chilled      500   32.5
## 53 Qc2   Quebec      chilled      500   38.6
## 54 Qc3   Quebec      chilled      500   38.9
## 55 Mn1   Mississippi nonchilled   500   30.9
## 56 Mn2   Mississippi nonchilled   500   32.4
## 57 Mn3   Mississippi nonchilled   500   28.5
## 58 Mc1   Mississippi chilled      500   19.5
## 59 Mc2   Mississippi chilled      500   12.5
## 60 Mc3   Mississippi chilled      500   17.9
## 61 Qn1   Quebec      nonchilled   675   39.2
## 62 Qn2   Quebec      nonchilled   675   41.4
## 63 Qn3   Quebec      nonchilled   675   43.9
## 64 Qc1   Quebec      chilled      675   35.4
## 65 Qc2   Quebec      chilled      675   37.5
## 66 Qc3   Quebec      chilled      675   39.6
## 67 Mn1   Mississippi nonchilled   675   32.4
## 68 Mn2   Mississippi nonchilled   675   31.1
## 69 Mn3   Mississippi nonchilled   675   28.1
## 70 Mc1   Mississippi chilled      675   22.2
## 71 Mc2   Mississippi chilled      675   13.7
## 72 Mc3   Mississippi chilled      675   18.9
## 73 Qn1   Quebec      nonchilled  1000   39.7
## 74 Qn2   Quebec      nonchilled  1000   44.3
## 75 Qn3   Quebec      nonchilled  1000   45.5
## 76 Qc1   Quebec      chilled     1000   38.7
## 77 Qc2   Quebec      chilled     1000   42.4
## 78 Qc3   Quebec      chilled     1000   41.4
## 79 Mn1   Mississippi nonchilled  1000   35.5
## 80 Mn2   Mississippi nonchilled  1000   31.5
## 81 Mn3   Mississippi nonchilled  1000   27.8
## 82 Mc1   Mississippi chilled     1000   21.9
## 83 Mc2   Mississippi chilled     1000   14.4
## 84 Mc3   Mississippi chilled     1000   19.9
CO2 %>% arrange(desc(uptake)) %>% print(n=84) #biggest to smallest
## # A tibble: 84 × 5
##    Plant Type        Treatment   conc uptake
##    <ord> <fct>       <fct>      <dbl>  <dbl>
##  1 Qn3   Quebec      nonchilled  1000   45.5
##  2 Qn2   Quebec      nonchilled  1000   44.3
##  3 Qn3   Quebec      nonchilled   675   43.9
##  4 Qn3   Quebec      nonchilled   500   42.9
##  5 Qc2   Quebec      chilled     1000   42.4
##  6 Qn3   Quebec      nonchilled   350   42.1
##  7 Qn2   Quebec      nonchilled   350   41.8
##  8 Qn2   Quebec      nonchilled   675   41.4
##  9 Qc3   Quebec      chilled     1000   41.4
## 10 Qn2   Quebec      nonchilled   500   40.6
## 11 Qn3   Quebec      nonchilled   250   40.3
## 12 Qn1   Quebec      nonchilled  1000   39.7
## 13 Qc3   Quebec      chilled      675   39.6
## 14 Qn1   Quebec      nonchilled   675   39.2
## 15 Qc3   Quebec      chilled      500   38.9
## 16 Qc2   Quebec      chilled      350   38.8
## 17 Qc1   Quebec      chilled     1000   38.7
## 18 Qc2   Quebec      chilled      500   38.6
## 19 Qc3   Quebec      chilled      250   38.1
## 20 Qc2   Quebec      chilled      675   37.5
## 21 Qn1   Quebec      nonchilled   350   37.2
## 22 Qn2   Quebec      nonchilled   250   37.1
## 23 Mn1   Mississippi nonchilled  1000   35.5
## 24 Qc1   Quebec      chilled      675   35.4
## 25 Qn1   Quebec      nonchilled   500   35.3
## 26 Qc2   Quebec      chilled      250   35  
## 27 Qn1   Quebec      nonchilled   250   34.8
## 28 Qc1   Quebec      chilled      350   34.6
## 29 Qc3   Quebec      chilled      350   34  
## 30 Qc1   Quebec      chilled      500   32.5
## 31 Qn3   Quebec      nonchilled   175   32.4
## 32 Mn1   Mississippi nonchilled   675   32.4
## 33 Mn2   Mississippi nonchilled   500   32.4
## 34 Mn2   Mississippi nonchilled   350   31.8
## 35 Mn2   Mississippi nonchilled  1000   31.5
## 36 Mn2   Mississippi nonchilled   675   31.1
## 37 Mn1   Mississippi nonchilled   500   30.9
## 38 Mn2   Mississippi nonchilled   250   30.6
## 39 Qn1   Quebec      nonchilled   175   30.4
## 40 Qc1   Quebec      chilled      250   30.3
## 41 Mn1   Mississippi nonchilled   350   30  
## 42 Mn3   Mississippi nonchilled   500   28.5
## 43 Mn3   Mississippi nonchilled   675   28.1
## 44 Mn3   Mississippi nonchilled   350   27.9
## 45 Mn3   Mississippi nonchilled  1000   27.8
## 46 Qn2   Quebec      nonchilled   175   27.3
## 47 Qc2   Quebec      chilled      175   27.3
## 48 Mn1   Mississippi nonchilled   250   26.2
## 49 Mn3   Mississippi nonchilled   250   25.8
## 50 Qc1   Quebec      chilled      175   24.1
## 51 Mc1   Mississippi chilled      675   22.2
## 52 Mn2   Mississippi nonchilled   175   22  
## 53 Mc1   Mississippi chilled     1000   21.9
## 54 Qc3   Quebec      chilled      175   21  
## 55 Mc3   Mississippi chilled     1000   19.9
## 56 Mc1   Mississippi chilled      500   19.5
## 57 Mn3   Mississippi nonchilled   175   19.4
## 58 Mn1   Mississippi nonchilled   175   19.2
## 59 Mc1   Mississippi chilled      350   18.9
## 60 Mc3   Mississippi chilled      675   18.9
## 61 Mc1   Mississippi chilled      250   18.1
## 62 Mc3   Mississippi chilled      175   18  
## 63 Mc3   Mississippi chilled      250   17.9
## 64 Mc3   Mississippi chilled      350   17.9
## 65 Mc3   Mississippi chilled      500   17.9
## 66 Qn3   Quebec      nonchilled    95   16.2
## 67 Qn1   Quebec      nonchilled    95   16  
## 68 Qc3   Quebec      chilled       95   15.1
## 69 Mc1   Mississippi chilled      175   14.9
## 70 Mc2   Mississippi chilled     1000   14.4
## 71 Qc1   Quebec      chilled       95   14.2
## 72 Mc2   Mississippi chilled      675   13.7
## 73 Qn2   Quebec      nonchilled    95   13.6
## 74 Mc2   Mississippi chilled      350   13  
## 75 Mc2   Mississippi chilled      500   12.5
## 76 Mc2   Mississippi chilled      250   12.3
## 77 Mn2   Mississippi nonchilled    95   12  
## 78 Mc2   Mississippi chilled      175   11.4
## 79 Mn3   Mississippi nonchilled    95   11.3
## 80 Mn1   Mississippi nonchilled    95   10.6
## 81 Mc3   Mississippi chilled       95   10.6
## 82 Mc1   Mississippi chilled       95   10.5
## 83 Qc2   Quebec      chilled       95    9.3
## 84 Mc2   Mississippi chilled       95    7.7
#FILTER
CO2 %>% filter(Type=="Mississippi") %>% print(n=50) #showing only values that we want
## # A tibble: 42 × 5
##    Plant Type        Treatment   conc uptake
##    <ord> <fct>       <fct>      <dbl>  <dbl>
##  1 Mn1   Mississippi nonchilled    95   10.6
##  2 Mn1   Mississippi nonchilled   175   19.2
##  3 Mn1   Mississippi nonchilled   250   26.2
##  4 Mn1   Mississippi nonchilled   350   30  
##  5 Mn1   Mississippi nonchilled   500   30.9
##  6 Mn1   Mississippi nonchilled   675   32.4
##  7 Mn1   Mississippi nonchilled  1000   35.5
##  8 Mn2   Mississippi nonchilled    95   12  
##  9 Mn2   Mississippi nonchilled   175   22  
## 10 Mn2   Mississippi nonchilled   250   30.6
## 11 Mn2   Mississippi nonchilled   350   31.8
## 12 Mn2   Mississippi nonchilled   500   32.4
## 13 Mn2   Mississippi nonchilled   675   31.1
## 14 Mn2   Mississippi nonchilled  1000   31.5
## 15 Mn3   Mississippi nonchilled    95   11.3
## 16 Mn3   Mississippi nonchilled   175   19.4
## 17 Mn3   Mississippi nonchilled   250   25.8
## 18 Mn3   Mississippi nonchilled   350   27.9
## 19 Mn3   Mississippi nonchilled   500   28.5
## 20 Mn3   Mississippi nonchilled   675   28.1
## 21 Mn3   Mississippi nonchilled  1000   27.8
## 22 Mc1   Mississippi chilled       95   10.5
## 23 Mc1   Mississippi chilled      175   14.9
## 24 Mc1   Mississippi chilled      250   18.1
## 25 Mc1   Mississippi chilled      350   18.9
## 26 Mc1   Mississippi chilled      500   19.5
## 27 Mc1   Mississippi chilled      675   22.2
## 28 Mc1   Mississippi chilled     1000   21.9
## 29 Mc2   Mississippi chilled       95    7.7
## 30 Mc2   Mississippi chilled      175   11.4
## 31 Mc2   Mississippi chilled      250   12.3
## 32 Mc2   Mississippi chilled      350   13  
## 33 Mc2   Mississippi chilled      500   12.5
## 34 Mc2   Mississippi chilled      675   13.7
## 35 Mc2   Mississippi chilled     1000   14.4
## 36 Mc3   Mississippi chilled       95   10.6
## 37 Mc3   Mississippi chilled      175   18  
## 38 Mc3   Mississippi chilled      250   17.9
## 39 Mc3   Mississippi chilled      350   17.9
## 40 Mc3   Mississippi chilled      500   17.9
## 41 Mc3   Mississippi chilled      675   18.9
## 42 Mc3   Mississippi chilled     1000   19.9
CO2 %>% select(Plant,conc,uptake) %>% print(n=84) #showing variables
## # A tibble: 84 × 3
##    Plant  conc uptake
##    <ord> <dbl>  <dbl>
##  1 Qn1      95   16  
##  2 Qn1     175   30.4
##  3 Qn1     250   34.8
##  4 Qn1     350   37.2
##  5 Qn1     500   35.3
##  6 Qn1     675   39.2
##  7 Qn1    1000   39.7
##  8 Qn2      95   13.6
##  9 Qn2     175   27.3
## 10 Qn2     250   37.1
## 11 Qn2     350   41.8
## 12 Qn2     500   40.6
## 13 Qn2     675   41.4
## 14 Qn2    1000   44.3
## 15 Qn3      95   16.2
## 16 Qn3     175   32.4
## 17 Qn3     250   40.3
## 18 Qn3     350   42.1
## 19 Qn3     500   42.9
## 20 Qn3     675   43.9
## 21 Qn3    1000   45.5
## 22 Qc1      95   14.2
## 23 Qc1     175   24.1
## 24 Qc1     250   30.3
## 25 Qc1     350   34.6
## 26 Qc1     500   32.5
## 27 Qc1     675   35.4
## 28 Qc1    1000   38.7
## 29 Qc2      95    9.3
## 30 Qc2     175   27.3
## 31 Qc2     250   35  
## 32 Qc2     350   38.8
## 33 Qc2     500   38.6
## 34 Qc2     675   37.5
## 35 Qc2    1000   42.4
## 36 Qc3      95   15.1
## 37 Qc3     175   21  
## 38 Qc3     250   38.1
## 39 Qc3     350   34  
## 40 Qc3     500   38.9
## 41 Qc3     675   39.6
## 42 Qc3    1000   41.4
## 43 Mn1      95   10.6
## 44 Mn1     175   19.2
## 45 Mn1     250   26.2
## 46 Mn1     350   30  
## 47 Mn1     500   30.9
## 48 Mn1     675   32.4
## 49 Mn1    1000   35.5
## 50 Mn2      95   12  
## 51 Mn2     175   22  
## 52 Mn2     250   30.6
## 53 Mn2     350   31.8
## 54 Mn2     500   32.4
## 55 Mn2     675   31.1
## 56 Mn2    1000   31.5
## 57 Mn3      95   11.3
## 58 Mn3     175   19.4
## 59 Mn3     250   25.8
## 60 Mn3     350   27.9
## 61 Mn3     500   28.5
## 62 Mn3     675   28.1
## 63 Mn3    1000   27.8
## 64 Mc1      95   10.5
## 65 Mc1     175   14.9
## 66 Mc1     250   18.1
## 67 Mc1     350   18.9
## 68 Mc1     500   19.5
## 69 Mc1     675   22.2
## 70 Mc1    1000   21.9
## 71 Mc2      95    7.7
## 72 Mc2     175   11.4
## 73 Mc2     250   12.3
## 74 Mc2     350   13  
## 75 Mc2     500   12.5
## 76 Mc2     675   13.7
## 77 Mc2    1000   14.4
## 78 Mc3      95   10.6
## 79 Mc3     175   18  
## 80 Mc3     250   17.9
## 81 Mc3     350   17.9
## 82 Mc3     500   17.9
## 83 Mc3     675   18.9
## 84 Mc3    1000   19.9
CO2 %>% select(-Treatment, -Type) %>% print(n=84) #deleting variables
## # A tibble: 84 × 3
##    Plant  conc uptake
##    <ord> <dbl>  <dbl>
##  1 Qn1      95   16  
##  2 Qn1     175   30.4
##  3 Qn1     250   34.8
##  4 Qn1     350   37.2
##  5 Qn1     500   35.3
##  6 Qn1     675   39.2
##  7 Qn1    1000   39.7
##  8 Qn2      95   13.6
##  9 Qn2     175   27.3
## 10 Qn2     250   37.1
## 11 Qn2     350   41.8
## 12 Qn2     500   40.6
## 13 Qn2     675   41.4
## 14 Qn2    1000   44.3
## 15 Qn3      95   16.2
## 16 Qn3     175   32.4
## 17 Qn3     250   40.3
## 18 Qn3     350   42.1
## 19 Qn3     500   42.9
## 20 Qn3     675   43.9
## 21 Qn3    1000   45.5
## 22 Qc1      95   14.2
## 23 Qc1     175   24.1
## 24 Qc1     250   30.3
## 25 Qc1     350   34.6
## 26 Qc1     500   32.5
## 27 Qc1     675   35.4
## 28 Qc1    1000   38.7
## 29 Qc2      95    9.3
## 30 Qc2     175   27.3
## 31 Qc2     250   35  
## 32 Qc2     350   38.8
## 33 Qc2     500   38.6
## 34 Qc2     675   37.5
## 35 Qc2    1000   42.4
## 36 Qc3      95   15.1
## 37 Qc3     175   21  
## 38 Qc3     250   38.1
## 39 Qc3     350   34  
## 40 Qc3     500   38.9
## 41 Qc3     675   39.6
## 42 Qc3    1000   41.4
## 43 Mn1      95   10.6
## 44 Mn1     175   19.2
## 45 Mn1     250   26.2
## 46 Mn1     350   30  
## 47 Mn1     500   30.9
## 48 Mn1     675   32.4
## 49 Mn1    1000   35.5
## 50 Mn2      95   12  
## 51 Mn2     175   22  
## 52 Mn2     250   30.6
## 53 Mn2     350   31.8
## 54 Mn2     500   32.4
## 55 Mn2     675   31.1
## 56 Mn2    1000   31.5
## 57 Mn3      95   11.3
## 58 Mn3     175   19.4
## 59 Mn3     250   25.8
## 60 Mn3     350   27.9
## 61 Mn3     500   28.5
## 62 Mn3     675   28.1
## 63 Mn3    1000   27.8
## 64 Mc1      95   10.5
## 65 Mc1     175   14.9
## 66 Mc1     250   18.1
## 67 Mc1     350   18.9
## 68 Mc1     500   19.5
## 69 Mc1     675   22.2
## 70 Mc1    1000   21.9
## 71 Mc2      95    7.7
## 72 Mc2     175   11.4
## 73 Mc2     250   12.3
## 74 Mc2     350   13  
## 75 Mc2     500   12.5
## 76 Mc2     675   13.7
## 77 Mc2    1000   14.4
## 78 Mc3      95   10.6
## 79 Mc3     175   18  
## 80 Mc3     250   17.9
## 81 Mc3     350   17.9
## 82 Mc3     500   17.9
## 83 Mc3     675   18.9
## 84 Mc3    1000   19.9
#MUTATE (adding new variable)
CO2 %>% mutate(consume=conc-uptake)
## # A tibble: 84 × 6
##    Plant Type   Treatment   conc uptake consume
##    <ord> <fct>  <fct>      <dbl>  <dbl>   <dbl>
##  1 Qn1   Quebec nonchilled    95   16      79  
##  2 Qn1   Quebec nonchilled   175   30.4   145. 
##  3 Qn1   Quebec nonchilled   250   34.8   215. 
##  4 Qn1   Quebec nonchilled   350   37.2   313. 
##  5 Qn1   Quebec nonchilled   500   35.3   465. 
##  6 Qn1   Quebec nonchilled   675   39.2   636. 
##  7 Qn1   Quebec nonchilled  1000   39.7   960. 
##  8 Qn2   Quebec nonchilled    95   13.6    81.4
##  9 Qn2   Quebec nonchilled   175   27.3   148. 
## 10 Qn2   Quebec nonchilled   250   37.1   213. 
## # ℹ 74 more rows
new_CO2 <- CO2 %>% select(-Treatment,-Type) %>% mutate(consume=conc-uptake)
new_CO2 %>% print(n=84)
## # A tibble: 84 × 4
##    Plant  conc uptake consume
##    <ord> <dbl>  <dbl>   <dbl>
##  1 Qn1      95   16      79  
##  2 Qn1     175   30.4   145. 
##  3 Qn1     250   34.8   215. 
##  4 Qn1     350   37.2   313. 
##  5 Qn1     500   35.3   465. 
##  6 Qn1     675   39.2   636. 
##  7 Qn1    1000   39.7   960. 
##  8 Qn2      95   13.6    81.4
##  9 Qn2     175   27.3   148. 
## 10 Qn2     250   37.1   213. 
## 11 Qn2     350   41.8   308. 
## 12 Qn2     500   40.6   459. 
## 13 Qn2     675   41.4   634. 
## 14 Qn2    1000   44.3   956. 
## 15 Qn3      95   16.2    78.8
## 16 Qn3     175   32.4   143. 
## 17 Qn3     250   40.3   210. 
## 18 Qn3     350   42.1   308. 
## 19 Qn3     500   42.9   457. 
## 20 Qn3     675   43.9   631. 
## 21 Qn3    1000   45.5   954. 
## 22 Qc1      95   14.2    80.8
## 23 Qc1     175   24.1   151. 
## 24 Qc1     250   30.3   220. 
## 25 Qc1     350   34.6   315. 
## 26 Qc1     500   32.5   468. 
## 27 Qc1     675   35.4   640. 
## 28 Qc1    1000   38.7   961. 
## 29 Qc2      95    9.3    85.7
## 30 Qc2     175   27.3   148. 
## 31 Qc2     250   35     215  
## 32 Qc2     350   38.8   311. 
## 33 Qc2     500   38.6   461. 
## 34 Qc2     675   37.5   638. 
## 35 Qc2    1000   42.4   958. 
## 36 Qc3      95   15.1    79.9
## 37 Qc3     175   21     154  
## 38 Qc3     250   38.1   212. 
## 39 Qc3     350   34     316  
## 40 Qc3     500   38.9   461. 
## 41 Qc3     675   39.6   635. 
## 42 Qc3    1000   41.4   959. 
## 43 Mn1      95   10.6    84.4
## 44 Mn1     175   19.2   156. 
## 45 Mn1     250   26.2   224. 
## 46 Mn1     350   30     320  
## 47 Mn1     500   30.9   469. 
## 48 Mn1     675   32.4   643. 
## 49 Mn1    1000   35.5   964. 
## 50 Mn2      95   12      83  
## 51 Mn2     175   22     153  
## 52 Mn2     250   30.6   219. 
## 53 Mn2     350   31.8   318. 
## 54 Mn2     500   32.4   468. 
## 55 Mn2     675   31.1   644. 
## 56 Mn2    1000   31.5   968. 
## 57 Mn3      95   11.3    83.7
## 58 Mn3     175   19.4   156. 
## 59 Mn3     250   25.8   224. 
## 60 Mn3     350   27.9   322. 
## 61 Mn3     500   28.5   472. 
## 62 Mn3     675   28.1   647. 
## 63 Mn3    1000   27.8   972. 
## 64 Mc1      95   10.5    84.5
## 65 Mc1     175   14.9   160. 
## 66 Mc1     250   18.1   232. 
## 67 Mc1     350   18.9   331. 
## 68 Mc1     500   19.5   480. 
## 69 Mc1     675   22.2   653. 
## 70 Mc1    1000   21.9   978. 
## 71 Mc2      95    7.7    87.3
## 72 Mc2     175   11.4   164. 
## 73 Mc2     250   12.3   238. 
## 74 Mc2     350   13     337  
## 75 Mc2     500   12.5   488. 
## 76 Mc2     675   13.7   661. 
## 77 Mc2    1000   14.4   986. 
## 78 Mc3      95   10.6    84.4
## 79 Mc3     175   18     157  
## 80 Mc3     250   17.9   232. 
## 81 Mc3     350   17.9   332. 
## 82 Mc3     500   17.9   482. 
## 83 Mc3     675   18.9   656. 
## 84 Mc3    1000   19.9   980.