Predict survival on the Titanic



In [ ]:

About:

The sinking of the RMS Titanic is one of the most infamous shipwrecks in history. On April 15, 1912, during her maiden voyage, the Titanic sank after colliding with an iceberg, killing 1502 out of 2224 passengers and crew. This sensational tragedy shocked the international community and led to better safety regulations for ships.

One of the reasons that the shipwreck led to such loss of life was that there were not enough lifeboats for the passengers and crew. Although there was some element of luck involved in surviving the sinking, some groups of people were more likely to survive than others, such as women, children, and the upper-class.

In this challenge, we ask you to complete the analysis of what sorts of people were likely to survive. In particular, we ask you to apply the tools of machine learning to predict which passengers survived the tragedy.



In [ ]:



In [ ]:



In [87]:

    
# #Load the data into a dataframe
titanic_train = read.csv("train.csv", header=T, na.strings=c("","NA"))



In [88]:

    
# #Structure of the data
str(titanic_train)









    



'data.frame':	891 obs. of  12 variables:
 $ PassengerId: int  1 2 3 4 5 6 7 8 9 10 ...
 $ Survived   : int  0 1 1 1 0 0 0 0 1 1 ...
 $ Pclass     : int  3 1 3 1 3 3 1 3 3 2 ...
 $ Name       : Factor w/ 891 levels "Abbing, Mr. Anthony",..: 109 191 358 277 16 559 520 629 417 581 ...
 $ Sex        : Factor w/ 2 levels "female","male": 2 1 1 1 2 2 2 2 1 1 ...
 $ Age        : num  22 38 26 35 35 NA 54 2 27 14 ...
 $ SibSp      : int  1 1 0 1 0 0 0 3 0 1 ...
 $ Parch      : int  0 0 0 0 0 0 0 1 2 0 ...
 $ Ticket     : Factor w/ 681 levels "110152","110413",..: 524 597 670 50 473 276 86 396 345 133 ...
 $ Fare       : num  7.25 71.28 7.92 53.1 8.05 ...
 $ Cabin      : Factor w/ 147 levels "A10","A14","A16",..: NA 82 NA 56 NA NA 130 NA NA NA ...
 $ Embarked   : Factor w/ 3 levels "C","Q","S": 3 1 3 3 3 2 3 3 3 1 ...



In [89]:

    
head(titanic_train)









    Out[89]:





PassengerId Survived Pclass Name Sex Age SibSp Parch Ticket Fare Cabin Embarked

	1 1 0 3 Braund, Mr. Owen Harris male 22 1 0 A/5 21171 7.25 NA S
	2 2 1 1 Cumings, Mrs. John Bradley (Florence Briggs Thayer) female 38 1 0 PC 17599 71.2833 C85 C
	3 3 1 3 Heikkinen, Miss. Laina female 26 0 0 STON/O2. 3101282 7.925 NA S
	4 4 1 1 Futrelle, Mrs. Jacques Heath (Lily May Peel) female 35 1 0 113803 53.1 C123 S
	5 5 0 3 Allen, Mr. William Henry male 35 0 0 373450 8.05 NA S
	6 6 0 3 Moran, Mr. James male NA 0 0 330877 8.4583 NA Q



In [90]:

    
summary(titanic_train)









    Out[90]:





  PassengerId       Survived          Pclass     
 Min.   :  1.0   Min.   :0.0000   Min.   :1.000  
 1st Qu.:223.5   1st Qu.:0.0000   1st Qu.:2.000  
 Median :446.0   Median :0.0000   Median :3.000  
 Mean   :446.0   Mean   :0.3838   Mean   :2.309  
 3rd Qu.:668.5   3rd Qu.:1.0000   3rd Qu.:3.000  
 Max.   :891.0   Max.   :1.0000   Max.   :3.000  
                                                 
                                    Name         Sex           Age       
 Abbing, Mr. Anthony                  :  1   female:314   Min.   : 0.42  
 Abbott, Mr. Rossmore Edward          :  1   male  :577   1st Qu.:20.12  
 Abbott, Mrs. Stanton (Rosa Hunt)     :  1                Median :28.00  
 Abelson, Mr. Samuel                  :  1                Mean   :29.70  
 Abelson, Mrs. Samuel (Hannah Wizosky):  1                3rd Qu.:38.00  
 Adahl, Mr. Mauritz Nils Martin       :  1                Max.   :80.00  
 (Other)                              :885                NA's   :177    
     SibSp           Parch             Ticket         Fare       
 Min.   :0.000   Min.   :0.0000   1601    :  7   Min.   :  0.00  
 1st Qu.:0.000   1st Qu.:0.0000   347082  :  7   1st Qu.:  7.91  
 Median :0.000   Median :0.0000   CA. 2343:  7   Median : 14.45  
 Mean   :0.523   Mean   :0.3816   3101295 :  6   Mean   : 32.20  
 3rd Qu.:1.000   3rd Qu.:0.0000   347088  :  6   3rd Qu.: 31.00  
 Max.   :8.000   Max.   :6.0000   CA 2144 :  6   Max.   :512.33  
                                  (Other) :852                   
         Cabin     Embarked  
 B96 B98    :  4   C   :168  
 C23 C25 C27:  4   Q   : 77  
 G6         :  4   S   :644  
 C22 C26    :  3   NA's:  2  
 D          :  3             
 (Other)    :186             
 NA's       :687



In [ ]:



In [ ]:



In [ ]:



In [91]:

    
# #The dependent variable is "Survived" - 0 or 1 AND all the other variables are the independent variables



In [102]:

    
titanic_train_cleaned = titanic_train[, !(colnames(titanic_train) %in% c("Name","Ticket", "Cabin", "PassengerId"))]



In [103]:

    
head(titanic_train_cleaned)









    Out[103]:





Survived Pclass Sex Age SibSp Parch Fare Embarked

	1 0 3 male 22 1 0 7.25 S
	2 1 1 female 38 1 0 71.2833 C
	3 1 3 female 26 0 0 7.925 S
	4 1 1 female 35 1 0 53.1 S
	5 0 3 male 35 0 0 8.05 S
	6 0 3 male NA 0 0 8.4583 Q



In [ ]:



In [ ]:



In [104]:

    
# #Comparing the number of Men and Women who survived
table(titanic_train_cleaned$Survived, titanic_train_cleaned$Sex)









    Out[104]:





   
    female male
  0     81  468
  1    233  109



In [105]:

    
# #Percentage of Women who survived
233*100/(233+81)









    Out[105]:




74.203821656051



In [106]:

    
# #Percentage of Men who survived
109*100/(109+468)









    Out[106]:




18.8908145580589



In [ ]:



In [ ]:



In [ ]:



In [ ]:



In [ ]:



In [107]:

    
model_1 = glm(Survived ~ ., data = titanic_train_cleaned, family = "binomial")



In [108]:

    
summary(model_1)









    Out[108]:





Call:
glm(formula = Survived ~ ., family = "binomial", data = titanic_train_cleaned)

Deviance Residuals: 
    Min       1Q   Median       3Q      Max  
-2.7233  -0.6447  -0.3799   0.6326   2.4457  

Coefficients:
             Estimate Std. Error z value Pr(>|z|)    
(Intercept)  5.637407   0.634550   8.884  < 2e-16 ***
Pclass      -1.199251   0.164619  -7.285 3.22e-13 ***
Sexmale     -2.638476   0.222256 -11.871  < 2e-16 ***
Age         -0.043350   0.008232  -5.266 1.39e-07 ***
SibSp       -0.363208   0.129017  -2.815  0.00487 ** 
Parch       -0.060270   0.123900  -0.486  0.62666    
Fare         0.001432   0.002531   0.566  0.57165    
EmbarkedQ   -0.823545   0.600229  -1.372  0.17005    
EmbarkedS   -0.401213   0.270283  -1.484  0.13770    
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

(Dispersion parameter for binomial family taken to be 1)

    Null deviance: 960.90  on 711  degrees of freedom
Residual deviance: 632.34  on 703  degrees of freedom
  (179 observations deleted due to missingness)
AIC: 650.34

Number of Fisher Scoring iterations: 5



In [ ]:



In [ ]:



In [ ]:



In [109]:

    
titanic_test = read.csv("test.csv")



In [110]:

    
titanic_test









    



Warning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generated





    Out[110]:





PassengerId Pclass Name Sex Age SibSp Parch Ticket Fare Cabin Embarked

	1 892 3 Kelly, Mr. James male 34.5 0 0 330911 7.8292 Q
	2 893 3 Wilkes, Mrs. James (Ellen Needs) female 47 1 0 363272 7 S
	3 894 2 Myles, Mr. Thomas Francis male 62 0 0 240276 9.6875 Q
	4 895 3 Wirz, Mr. Albert male 27 0 0 315154 8.6625 S
	5 896 3 Hirvonen, Mrs. Alexander (Helga E Lindqvist) female 22 1 1 3101298 12.2875 S
	6 897 3 Svensson, Mr. Johan Cervin male 14 0 0 7538 9.225 S
	7 898 3 Connolly, Miss. Kate female 30 0 0 330972 7.6292 Q
	8 899 2 Caldwell, Mr. Albert Francis male 26 1 1 248738 29 S
	9 900 3 Abrahim, Mrs. Joseph (Sophie Halaut Easu) female 18 0 0 2657 7.2292 C
	10 901 3 Davies, Mr. John Samuel male 21 2 0 A/4 48871 24.15 S
	11 902 3 Ilieff, Mr. Ylio male NA 0 0 349220 7.8958 S
	12 903 1 Jones, Mr. Charles Cresson male 46 0 0 694 26 S
	13 904 1 Snyder, Mrs. John Pillsbury (Nelle Stevenson) female 23 1 0 21228 82.2667 B45 S
	14 905 2 Howard, Mr. Benjamin male 63 1 0 24065 26 S
	15 906 1 Chaffee, Mrs. Herbert Fuller (Carrie Constance Toogood) female 47 1 0 W.E.P. 5734 61.175 E31 S
	16 907 2 del Carlo, Mrs. Sebastiano (Argenia Genovesi) female 24 1 0 SC/PARIS 2167 27.7208 C
	17 908 2 Keane, Mr. Daniel male 35 0 0 233734 12.35 Q
	18 909 3 Assaf, Mr. Gerios male 21 0 0 2692 7.225 C
	19 910 3 Ilmakangas, Miss. Ida Livija female 27 1 0 STON/O2. 3101270 7.925 S
	20 911 3 Assaf Khalil, Mrs. Mariana (Miriam")" female 45 0 0 2696 7.225 C
	21 912 1 Rothschild, Mr. Martin male 55 1 0 PC 17603 59.4 C
	22 913 3 Olsen, Master. Artur Karl male 9 0 1 C 17368 3.1708 S
	23 914 1 Flegenheim, Mrs. Alfred (Antoinette) female NA 0 0 PC 17598 31.6833 S
	24 915 1 Williams, Mr. Richard Norris II male 21 0 1 PC 17597 61.3792 C
	25 916 1 Ryerson, Mrs. Arthur Larned (Emily Maria Borie) female 48 1 3 PC 17608 262.375 B57 B59 B63 B66 C
	26 917 3 Robins, Mr. Alexander A male 50 1 0 A/5. 3337 14.5 S
	27 918 1 Ostby, Miss. Helene Ragnhild female 22 0 1 113509 61.9792 B36 C
	28 919 3 Daher, Mr. Shedid male 22.5 0 0 2698 7.225 C
	29 920 1 Brady, Mr. John Bertram male 41 0 0 113054 30.5 A21 S
	30 921 3 Samaan, Mr. Elias male NA 2 0 2662 21.6792 C
	31 <8b> <8b> NA NA <8b> <8b> <8b> NA <8b> NA NA
	389 1280 3 Canavan, Mr. Patrick male 21 0 0 364858 7.75 Q
	390 1281 3 Palsson, Master. Paul Folke male 6 3 1 349909 21.075 S
	391 1282 1 Payne, Mr. Vivian Ponsonby male 23 0 0 12749 93.5 B24 S
	392 1283 1 Lines, Mrs. Ernest H (Elizabeth Lindsey James) female 51 0 1 PC 17592 39.4 D28 S
	393 1284 3 Abbott, Master. Eugene Joseph male 13 0 2 C.A. 2673 20.25 S
	394 1285 2 Gilbert, Mr. William male 47 0 0 C.A. 30769 10.5 S
	395 1286 3 Kink-Heilmann, Mr. Anton male 29 3 1 315153 22.025 S
	396 1287 1 Smith, Mrs. Lucien Philip (Mary Eloise Hughes) female 18 1 0 13695 60 C31 S
	397 1288 3 Colbert, Mr. Patrick male 24 0 0 371109 7.25 Q
	398 1289 1 Frolicher-Stehli, Mrs. Maxmillian (Margaretha Emerentia Stehli) female 48 1 1 13567 79.2 B41 C
	399 1290 3 Larsson-Rondberg, Mr. Edvard A male 22 0 0 347065 7.775 S
	400 1291 3 Conlon, Mr. Thomas Henry male 31 0 0 21332 7.7333 Q
	401 1292 1 Bonnell, Miss. Caroline female 30 0 0 36928 164.8667 C7 S
	402 1293 2 Gale, Mr. Harry male 38 1 0 28664 21 S
	403 1294 1 Gibson, Miss. Dorothy Winifred female 22 0 1 112378 59.4 C
	404 1295 1 Carrau, Mr. Jose Pedro male 17 0 0 113059 47.1 S
	405 1296 1 Frauenthal, Mr. Isaac Gerald male 43 1 0 17765 27.7208 D40 C
	406 1297 2 Nourney, Mr. Alfred (Baron von Drachstedt")" male 20 0 0 SC/PARIS 2166 13.8625 D38 C
	407 1298 2 Ware, Mr. William Jeffery male 23 1 0 28666 10.5 S
	408 1299 1 Widener, Mr. George Dunton male 50 1 1 113503 211.5 C80 C
	409 1300 3 Riordan, Miss. Johanna Hannah"" female NA 0 0 334915 7.7208 Q
	410 1301 3 Peacock, Miss. Treasteall female 3 1 1 SOTON/O.Q. 3101315 13.775 S
	411 1302 3 Naughton, Miss. Hannah female NA 0 0 365237 7.75 Q
	412 1303 1 Minahan, Mrs. William Edward (Lillian E Thorpe) female 37 1 0 19928 90 C78 Q
	413 1304 3 Henriksson, Miss. Jenny Lovisa female 28 0 0 347086 7.775 S
	414 1305 3 Spector, Mr. Woolf male NA 0 0 A.5. 3236 8.05 S
	415 1306 1 Oliva y Ocana, Dona. Fermina female 39 0 0 PC 17758 108.9 C105 C
	416 1307 3 Saether, Mr. Simon Sivertsen male 38.5 0 0 SOTON/O.Q. 3101262 7.25 S
	417 1308 3 Ware, Mr. Frederick male NA 0 0 359309 8.05 S
	418 1309 3 Peter, Master. Michael J male NA 1 1 2668 22.3583 C



In [119]:

    
predictTest = predict.glm(model_1, newdata = titanic_test, type = "response")



In [120]:

    
survival = ifelse(predictTest>=0.5,1,0)



In [121]:

    
output = cbind(titanic_test, predictTest, survival)



In [126]:

    
output









    



Warning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generatedWarning message:
In `[<-.factor`(`*tmp*`, ri, value = "<e2><8b><ae>"): invalid factor level, NA generated





    Out[126]:





PassengerId Pclass Name Sex Age SibSp Parch Ticket Fare Cabin Embarked predictTest survival

	1 892 3 Kelly, Mr. James male 34.5 0 0 330911 7.8292 Q 0.051821732991821 0
	2 893 3 Wilkes, Mrs. James (Ellen Needs) female 47 1 0 363272 7 S 0.320343155869419 0
	3 894 2 Myles, Mr. Thomas Francis male 62 0 0 240276 9.6875 Q 0.0523047502494676 0
	4 895 3 Wirz, Mr. Albert male 27 0 0 315154 8.6625 S 0.103578228987168 0
	5 896 3 Hirvonen, Mrs. Alexander (Helga E Lindqvist) female 22 1 1 3101298 12.2875 S 0.569265167731991 1
	6 897 3 Svensson, Mr. Johan Cervin male 14 0 0 7538 9.225 S 0.16885989640421 0
	7 898 3 Connolly, Miss. Kate female 30 0 0 330972 7.6292 Q 0.481641250566062 0
	8 899 2 Caldwell, Mr. Albert Francis male 26 1 1 248738 29 S 0.212512575616221 0
	9 900 3 Abrahim, Mrs. Joseph (Sophie Halaut Easu) female 18 0 0 2657 7.2292 C 0.780692018910152 1
	10 901 3 Davies, Mr. John Samuel male 21 2 0 A/4 48871 24.15 S 0.0689950965340154 0
	11 902 3 Ilieff, Mr. Ylio male NA 0 0 349220 7.8958 S NA NA
	12 903 1 Jones, Mr. Charles Cresson male 46 0 0 694 26 S 0.363915134558356 0
	13 904 1 Snyder, Mrs. John Pillsbury (Nelle Stevenson) female 23 1 0 21228 82.2667 B45 S 0.942375531681908 1
	14 905 2 Howard, Mr. Benjamin male 63 1 0 24065 26 S 0.0542784950000937 0
	15 906 1 Chaffee, Mrs. Herbert Fuller (Carrie Constance Toogood) female 47 1 0 W.E.P. 5734 61.175 E31 S 0.848625716114988 1
	16 907 2 del Carlo, Mrs. Sebastiano (Argenia Genovesi) female 24 1 0 SC/PARIS 2167 27.7208 C 0.867033674672601 1
	17 908 2 Keane, Mr. Daniel male 35 0 0 233734 12.35 Q 0.151525632961046 0
	18 909 3 Assaf, Mr. Gerios male 21 0 0 2692 7.225 C 0.182600301321856 0
	19 910 3 Ilmakangas, Miss. Ida Livija female 27 1 0 STON/O2. 3101270 7.925 S 0.528999497398422 1
	20 911 3 Assaf Khalil, Mrs. Mariana (Miriam")" female 45 0 0 2696 7.225 C 0.524791789580254 1
	21 912 1 Rothschild, Mr. Martin male 55 1 0 PC 17603 59.4 C 0.296766988626945 0
	22 913 3 Olsen, Master. Artur Karl male 9 0 1 C 17368 3.1708 S 0.190630884239747 0
	23 914 1 Flegenheim, Mrs. Alfred (Antoinette) female NA 0 0 PC 17598 31.6833 S NA NA
	24 915 1 Williams, Mr. Richard Norris II male 21 0 1 PC 17597 61.3792 C 0.714416135753092 1
	25 916 1 Ryerson, Mrs. Arthur Larned (Emily Maria Borie) female 48 1 3 PC 17608 262.375 B57 B59 B63 B66 C 0.899253004696105 1
	26 917 3 Robins, Mr. Alexander A male 50 1 0 A/5. 3337 14.5 S 0.0290294698379009 0
	27 918 1 Ostby, Miss. Helene Ragnhild female 22 0 1 113509 61.9792 B36 C 0.971053020850646 1
	28 919 3 Daher, Mr. Shedid male 22.5 0 0 2698 7.225 C 0.173094384995819 0
	29 920 1 Brady, Mr. John Bertram male 41 0 0 113054 30.5 A21 S 0.416971226480464 0
	30 921 3 Samaan, Mr. Elias male NA 2 0 2662 21.6792 C NA NA
	31 <8b> <8b> NA NA <8b> <8b> <8b> NA <8b> NA NA <8b> <8b>
	389 1280 3 Canavan, Mr. Patrick male 21 0 0 364858 7.75 Q 0.0893480191736864 0
	390 1281 3 Palsson, Master. Paul Folke male 6 3 1 349909 21.075 S 0.0847214322477844 0
	391 1282 1 Payne, Mr. Vivian Ponsonby male 23 0 0 12749 93.5 B24 S 0.63071142200867 1
	392 1283 1 Lines, Mrs. Ernest H (Elizabeth Lindsey James) female 51 0 1 PC 17592 39.4 D28 S 0.860833339338297 1
	393 1284 3 Abbott, Master. Eugene Joseph male 13 0 2 C.A. 2673 20.25 S 0.160416100080293 0
	394 1285 2 Gilbert, Mr. William male 47 0 0 C.A. 30769 10.5 S 0.139050130003816 0
	395 1286 3 Kink-Heilmann, Mr. Anton male 29 3 1 315153 22.025 S 0.0330684163733309 0
	396 1287 1 Smith, Mrs. Lucien Philip (Mary Eloise Hughes) female 18 1 0 13695 60 C31 S 0.951631527803109 1
	397 1288 3 Colbert, Mr. Patrick male 24 0 0 371109 7.25 Q 0.0792641363237416 0
	398 1289 1 Frolicher-Stehli, Mrs. Maxmillian (Margaretha Emerentia Stehli) female 48 1 1 13567 79.2 B41 C 0.885670540717274 1
	399 1290 3 Larsson-Rondberg, Mr. Edvard A male 22 0 0 347065 7.775 S 0.125361997054514 0
	400 1291 3 Conlon, Mr. Thomas Henry male 31 0 0 21332 7.7333 Q 0.0597967189598365 0
	401 1292 1 Bonnell, Miss. Caroline female 30 0 0 36928 164.8667 C7 S 0.951314533903176 1
	402 1293 2 Gale, Mr. Harry male 38 1 0 28664 21 S 0.144151472218659 0
	403 1294 1 Gibson, Miss. Dorothy Winifred female 22 0 1 112378 59.4 C 0.970949051752717 1
	404 1295 1 Carrau, Mr. Jose Pedro male 17 0 0 113059 47.1 S 0.674573548658884 1
	405 1296 1 Frauenthal, Mr. Isaac Gerald male 43 1 0 17765 27.7208 D40 C 0.404224642940994 0
	406 1297 2 Nourney, Mr. Alfred (Baron von Drachstedt")" male 20 0 0 SC/PARIS 2166 13.8625 D38 C 0.438629616081759 0
	407 1298 2 Ware, Mr. William Jeffery male 23 1 0 28666 10.5 S 0.241218460049096 0
	408 1299 1 Widener, Mr. George Dunton male 50 1 1 113503 211.5 C80 C 0.380243066792599 0
	409 1300 3 Riordan, Miss. Johanna Hannah"" female NA 0 0 334915 7.7208 Q NA NA
	410 1301 3 Peacock, Miss. Treasteall female 3 1 1 SOTON/O.Q. 3101315 13.775 S 0.751127100031508 1
	411 1302 3 Naughton, Miss. Hannah female NA 0 0 365237 7.75 Q NA NA
	412 1303 1 Minahan, Mrs. William Edward (Lillian E Thorpe) female 37 1 0 19928 90 C78 Q 0.855238964139487 1
	413 1304 3 Henriksson, Miss. Jenny Lovisa female 28 0 0 347086 7.775 S 0.607251119463523 1
	414 1305 3 Spector, Mr. Woolf male NA 0 0 A.5. 3236 8.05 S NA NA
	415 1306 1 Oliva y Ocana, Dona. Fermina female 39 0 0 PC 17758 108.9 C105 C 0.948014586213436 1
	416 1307 3 Saether, Mr. Simon Sivertsen male 38.5 0 0 SOTON/O.Q. 3101262 7.25 S 0.0654590550228509 0
	417 1308 3 Ware, Mr. Frederick male NA 0 0 359309 8.05 S NA NA
	418 1309 3 Peter, Master. Michael J male NA 1 1 2668 22.3583 C NA NA



In [127]:

    
write.csv(output, "output_1.csv")



In [ ]:

	PassengerId	Survived	Pclass	Name	Sex	Age	SibSp	Ticket	Fare	Cabin	Embarked
1	1	0	3	Braund, Mr. Owen Harris	male	22	1	A/5 21171	7.25	NA	S
2	2	1	1	Cumings, Mrs. John Bradley (Florence Briggs Thayer)	female	38	1	PC 17599	71.2833	C85	C
3	3	1	3	Heikkinen, Miss. Laina	female	26	0	STON/O2. 3101282	7.925	NA	S
4	4	1	1	Futrelle, Mrs. Jacques Heath (Lily May Peel)	female	35	1	113803	53.1	C123	S
5	5	0	3	Allen, Mr. William Henry	male	35	0	373450	8.05	NA	S
6	6	0	3	Moran, Mr. James	male	NA	0	330877	8.4583	NA	Q

	PassengerId	Pclass	Name	Sex	Age	SibSp	Parch	Ticket	Fare	Cabin	Embarked
1	892	3	Kelly, Mr. James	male	34.5	0	0	330911	7.8292		Q
2	893	3	Wilkes, Mrs. James (Ellen Needs)	female	47	1	0	363272	7		S
3	894	2	Myles, Mr. Thomas Francis	male	62	0	0	240276	9.6875		Q
4	895	3	Wirz, Mr. Albert	male	27	0	0	315154	8.6625		S
5	896	3	Hirvonen, Mrs. Alexander (Helga E Lindqvist)	female	22	1	1	3101298	12.2875		S
6	897	3	Svensson, Mr. Johan Cervin	male	14	0	0	7538	9.225		S
7	898	3	Connolly, Miss. Kate	female	30	0	0	330972	7.6292		Q
8	899	2	Caldwell, Mr. Albert Francis	male	26	1	1	248738	29		S
9	900	3	Abrahim, Mrs. Joseph (Sophie Halaut Easu)	female	18	0	0	2657	7.2292		C
10	901	3	Davies, Mr. John Samuel	male	21	2	0	A/4 48871	24.15		S
11	902	3	Ilieff, Mr. Ylio	male	NA	0	0	349220	7.8958		S
12	903	1	Jones, Mr. Charles Cresson	male	46	0	0	694	26		S
13	904	1	Snyder, Mrs. John Pillsbury (Nelle Stevenson)	female	23	1	0	21228	82.2667	B45	S
14	905	2	Howard, Mr. Benjamin	male	63	1	0	24065	26		S
15	906	1	Chaffee, Mrs. Herbert Fuller (Carrie Constance Toogood)	female	47	1	0	W.E.P. 5734	61.175	E31	S
16	907	2	del Carlo, Mrs. Sebastiano (Argenia Genovesi)	female	24	1	0	SC/PARIS 2167	27.7208		C
17	908	2	Keane, Mr. Daniel	male	35	0	0	233734	12.35		Q
18	909	3	Assaf, Mr. Gerios	male	21	0	0	2692	7.225		C
19	910	3	Ilmakangas, Miss. Ida Livija	female	27	1	0	STON/O2. 3101270	7.925		S
20	911	3	Assaf Khalil, Mrs. Mariana (Miriam")"	female	45	0	0	2696	7.225		C
21	912	1	Rothschild, Mr. Martin	male	55	1	0	PC 17603	59.4		C
22	913	3	Olsen, Master. Artur Karl	male	9	0	1	C 17368	3.1708		S
23	914	1	Flegenheim, Mrs. Alfred (Antoinette)	female	NA	0	0	PC 17598	31.6833		S
24	915	1	Williams, Mr. Richard Norris II	male	21	0	1	PC 17597	61.3792		C
25	916	1	Ryerson, Mrs. Arthur Larned (Emily Maria Borie)	female	48	1	3	PC 17608	262.375	B57 B59 B63 B66	C
26	917	3	Robins, Mr. Alexander A	male	50	1	0	A/5. 3337	14.5		S
27	918	1	Ostby, Miss. Helene Ragnhild	female	22	0	1	113509	61.9792	B36	C
28	919	3	Daher, Mr. Shedid	male	22.5	0	0	2698	7.225		C
29	920	1	Brady, Mr. John Bertram	male	41	0	0	113054	30.5	A21	S
30	921	3	Samaan, Mr. Elias	male	NA	2	0	2662	21.6792		C
31	<8b>	<8b>	NA	NA	<8b>	<8b>	<8b>	NA	<8b>	NA	NA
389	1280	3	Canavan, Mr. Patrick	male	21	0	0	364858	7.75		Q
390	1281	3	Palsson, Master. Paul Folke	male	6	3	1	349909	21.075		S
391	1282	1	Payne, Mr. Vivian Ponsonby	male	23	0	0	12749	93.5	B24	S
392	1283	1	Lines, Mrs. Ernest H (Elizabeth Lindsey James)	female	51	0	1	PC 17592	39.4	D28	S
393	1284	3	Abbott, Master. Eugene Joseph	male	13	0	2	C.A. 2673	20.25		S
394	1285	2	Gilbert, Mr. William	male	47	0	0	C.A. 30769	10.5		S
395	1286	3	Kink-Heilmann, Mr. Anton	male	29	3	1	315153	22.025		S
396	1287	1	Smith, Mrs. Lucien Philip (Mary Eloise Hughes)	female	18	1	0	13695	60	C31	S
397	1288	3	Colbert, Mr. Patrick	male	24	0	0	371109	7.25		Q
398	1289	1	Frolicher-Stehli, Mrs. Maxmillian (Margaretha Emerentia Stehli)	female	48	1	1	13567	79.2	B41	C
399	1290	3	Larsson-Rondberg, Mr. Edvard A	male	22	0	0	347065	7.775		S
400	1291	3	Conlon, Mr. Thomas Henry	male	31	0	0	21332	7.7333		Q
401	1292	1	Bonnell, Miss. Caroline	female	30	0	0	36928	164.8667	C7	S
402	1293	2	Gale, Mr. Harry	male	38	1	0	28664	21		S
403	1294	1	Gibson, Miss. Dorothy Winifred	female	22	0	1	112378	59.4		C
404	1295	1	Carrau, Mr. Jose Pedro	male	17	0	0	113059	47.1		S
405	1296	1	Frauenthal, Mr. Isaac Gerald	male	43	1	0	17765	27.7208	D40	C
406	1297	2	Nourney, Mr. Alfred (Baron von Drachstedt")"	male	20	0	0	SC/PARIS 2166	13.8625	D38	C
407	1298	2	Ware, Mr. William Jeffery	male	23	1	0	28666	10.5		S
408	1299	1	Widener, Mr. George Dunton	male	50	1	1	113503	211.5	C80	C
409	1300	3	Riordan, Miss. Johanna Hannah""	female	NA	0	0	334915	7.7208		Q
410	1301	3	Peacock, Miss. Treasteall	female	3	1	1	SOTON/O.Q. 3101315	13.775		S
411	1302	3	Naughton, Miss. Hannah	female	NA	0	0	365237	7.75		Q
412	1303	1	Minahan, Mrs. William Edward (Lillian E Thorpe)	female	37	1	0	19928	90	C78	Q
413	1304	3	Henriksson, Miss. Jenny Lovisa	female	28	0	0	347086	7.775		S
414	1305	3	Spector, Mr. Woolf	male	NA	0	0	A.5. 3236	8.05		S
415	1306	1	Oliva y Ocana, Dona. Fermina	female	39	0	0	PC 17758	108.9	C105	C
416	1307	3	Saether, Mr. Simon Sivertsen	male	38.5	0	0	SOTON/O.Q. 3101262	7.25		S
417	1308	3	Ware, Mr. Frederick	male	NA	0	0	359309	8.05		S
418	1309	3	Peter, Master. Michael J	male	NA	1	1	2668	22.3583		C