Read and Write into a CSV file

listings = read.csv('listings.csv')
print(listings)

days <- c('Mon', 'Tue', 'Wed', 'Thur', 'Fri')
temp <- c(20, 30, 20, 24, 25)
rain <- c(T, F, F, F, T)
df <- data.frame(days, temp, rain)

write.csv(df, file = 'days.with.temps.csv')