-
Notifications
You must be signed in to change notification settings - Fork 3
/
.Rhistory
36 lines (36 loc) · 1.45 KB
/
.Rhistory
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
print ("Hello World!!", quote = FALSE)
typos = c(2,3,0,3,1,0,0,1)
typos
help(lm)
ins = edit(data.fram())
ins = edit(data.frame())
ins = edit(data.frame())
ins = edit(data.frame())
head(new)
View(ins)
setwd("C:/Users/User/Desktop/4th Semester/Probability and Statistics/Assignment/Final Work/v2")
#-----------------------------------------------------------------3
# Read in data from csv file
setwd("C:/Users/User/Desktop/4th Semester/Probability and Statistics/Assignment/Final Work/v2")
intel <- read.csv ("IntelProcessors.csv", header = TRUE, sep = ",")
#-----------------------------------------------------------------3
# Read in data from csv file
setwd("C:/Users/User/Desktop/4th Semester/Probability and Statistics/Assignment/Final Work/v2")
intel <- read.csv ("MT2013-CC03-03-Cao Minh Quang-DataSet.csv", header = TRUE, sep = ",")
View(intel)
#------------------------------------------------------------------4
# Data Cleaning
install.packages("tidyverse")
library(tidyr)
cleanIntel <- drop_na(intel)
View(cleanIntel)
#--------------------------------------------------------------5.1
# Cut off unnecessary column: id, name, launch_date
newIntel <- cleanIntel[,c("cores","threads","bus_speed","base_frequency","turbo_frequency"
,"cache_size","max_memory_size","max_temp")]
head(newIntel)
#--------------------------------------------------------------5.2
# Descriptive statistic
install.packages("pastecs")
library(pastecs)
stat.desc(newIntel[, c(1,2,3,4,5,6,7,8)]) %>% round(4)