text_plain_output_1.png
train < -read.table('../input/train.csv', sep=',')
test < -read.table('../input/test.csv', sep=',')

train < -read.table('../input/train.csv', sep=',', header=TRUE)
test < -read.table('../input/test.csv', sep=',', header=TRUE)
str(train)