I have data in 3 columns:(as shown below
Try this:
library(zoo)
z <- read.zoo("myfile.dat", header = TRUE, index = 1:2, format = "%Y%m%d %H:%M", tz = "")
# classic graphics
plot(z)
# ggplot2 graphics
autoplot(z)
To generate a file for the sample data provided in the question try this; however, with only one point you won't see anything on a line graph.
cat("Date Time LTP\n20180102 09:16 1800", file = "myfile.dat")