file_name <- "file.txt"lines <- c("Line 1", "Line 2")# One string per line, a newline after eachwriteLines(lines, file_name)size <- file.size(file_name)# size = 14cat("size =", size, "\n")