R read csv file

comp_fte_trnd <- read.csv("~/R_work/afile.csv", header=TRUE, sep="|")