data <- read.csv("D:/file1.csv", header=T, dec=",", sep=";") x <- data[,1] y <- data[,2] xlim <- c(0,120) ylim <- c(0,5) plot (x,y, type="l", xlab="time", ylab="experiencing level dyad e", xlim=xlim, ylim=ylim, main="Psychotherapy Session Data")