remove(list=ls())
#install.packages("visdat")
library(visdat) #for data visualization
Day 2 Discussion Titanic
Set Up
Import Data
<- read.csv("C:/Users/aarit/Downloads/train.csv")
train head(train)
PassengerId Survived Pclass
1 1 0 3
2 2 1 1
3 3 1 3
4 4 1 1
5 5 0 3
6 6 0 3
Name Sex Age SibSp Parch
1 Braund, Mr. Owen Harris male 22 1 0
2 Cumings, Mrs. John Bradley (Florence Briggs Thayer) female 38 1 0
3 Heikkinen, Miss. Laina female 26 0 0
4 Futrelle, Mrs. Jacques Heath (Lily May Peel) female 35 1 0
5 Allen, Mr. William Henry male 35 0 0
6 Moran, Mr. James male NA 0 0
Ticket Fare Cabin Embarked
1 A/5 21171 7.2500 S
2 PC 17599 71.2833 C85 C
3 STON/O2. 3101282 7.9250 S
4 113803 53.1000 C123 S
5 373450 8.0500 S
6 330877 8.4583 Q
tail(train)
PassengerId Survived Pclass Name Sex
886 886 0 3 Rice, Mrs. William (Margaret Norton) female
887 887 0 2 Montvila, Rev. Juozas male
888 888 1 1 Graham, Miss. Margaret Edith female
889 889 0 3 Johnston, Miss. Catherine Helen "Carrie" female
890 890 1 1 Behr, Mr. Karl Howell male
891 891 0 3 Dooley, Mr. Patrick male
Age SibSp Parch Ticket Fare Cabin Embarked
886 39 0 5 382652 29.125 Q
887 27 0 0 211536 13.000 S
888 19 0 0 112053 30.000 B42 S
889 NA 1 2 W./C. 6607 23.450 S
890 26 0 0 111369 30.000 C148 C
891 32 0 0 370376 7.750 Q
dim(train)
[1] 891 12
?visdat
starting httpd help server ... done
vis_dat(train)