Start from Week2_Part1.R script, change it according to your selected datset from Quiz2. Then submit to this link: 1. Your modified script. 2. A screenshot report showing the outputs from your rstudio after executing all activities.

 . 

Start from Week2_Part1.R script, change it according to your selected datset from Quiz2. 

Then submit to this link:

1. Your modified script.

2. A screenshot report showing the outputs from your rstudio after executing all activities.

Dataset :  https://github.com/jzadeh/aktaion2/tree/master/data 

  

Week2_part1.R:

# comments start with #

# to quit q()

# two steps to install any library

#install.packages("rattle")

#library(rattle)

setwd("C:/Users/ialsmadi/Desktop/University_of_Cumberlands/Lectures/Week2/RScripts")

getwd()

x <- 3 # x is a vector of length 1

print(x)

v1 <- c(2,4,6,8,10)

print(v1)

print(v1[3])

v <- c(1:10) #creates a vector of 10 elements numbered 1 through 10. More complicated data

print(v)

print(v[6])

# Import test data

test<-read.csv("yearly_sales.csv")

test1<-read.csv("yearly_sales.csv", sep=",")

test2<-read.table("yearly_sales.csv", sep=",")

write.csv(test2, file="out.csv")

# Write CSV in R

write.table(test1, file = "out1.csv",row.names=TRUE, na="",col.names=TRUE, sep=",")

head(test)

tail(test)

summary(test)

head <- head(test)

tail <- tail(test)

cor(test$sales_total, test$num_of_orders)

sd(test$sales_total)

var(test$sales_total)

plot(test$sales_total)

hist(test$sales_total)

str(test$sales_total)

quit()