# You can write R code here and then click "Run" to run it on our platform

# The readr library is the best way to read and write CSV files in R
library(readr)
library(dplyr)
library(lava)
library(ranger)

# The competition datafiles are in the directory ../input
# List the files we have available to work with
system("ls ../input")

# Read competition data files:

train <- read_csv("../input/training.csv")
# test <- read_csv("../input/test.csv")

print(head(train))
# Write to the log:
cat(sprintf("Training set has %d rows and %d columns\n", nrow(train), ncol(train)))
#cat(sprintf("Test set has %d rows and %d columns\n", nrow(test), ncol(test)))

# Generate output files with write_csv(), plot() or ggplot()
# Any files you write to the current directory get shown as outputs