Scribd
Upload
13 views1 page

Data Analysis with Tidyverse in R

Uploaded by

thedailytalk010
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
13 views1 page

Data Analysis with Tidyverse in R

Uploaded by

thedailytalk010
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd

install.

packages('tidyverse')

library(tidyverse)

class(dfWRKCTR)

ls(A02_CH02_WRKCTR)

boxplot(A02_CH02_WRKCTR, horizontal=TRUE)

boxplot(NUMBER$WHEN, horizontal=TRUE)

View(A02_CH02_WRKCTR)

boxplot(WHEN$NUMBER)

boxplot(A02_CH02_WRKCTR$WHEN)

boxplot(A02_CH02_WRKCTR$WHEN ~ A02_CH02_WRKCTR$NUMBER)

head(A02_CH02_WRKCTR)

summary(A02_CH02_WRKCTR)

tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, summary)

tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, range)

tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, IQR)

tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, var)

boxplot(A02_CH02_WRKCTR$NUMBER ~ A02_CH02_WRKCTR$WHEN)

boxplot(A02_CH02_WRKCTR$NUMBER ~ A02_CH02_WRKCTR$WHEN, horizontal=TRUE)

rtgMAXarrive <- max(A02_CH02_WRKCTR$WHEN$ARRIVE)

rtgMAXarrive <- max(A02_CH02_WRKCTR$ARRIVE)

sort(A02_CH02_WRKCTR)

max(A02_CH02_WRKCTR$WHEN)

max(A02_CH02_WRKCTR$NUMBER$ARRIVE)

max(A02_CH02_WRKCTR$NUMBER)

tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, max)

rtgMAX <- tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, max)

rtgMIN <- tapply(A02_CH02_WRKCTR$NUMBER, A02_CH02_WRKCTR$WHEN, min)

rtgRange <- rtgMAX-rtgMIN

rtgRange

You might also like