bcom.r

#library(dplyr)
library(ggplot2)

#mydata<-read.table("~/Downloads/bcom.csv",sep=",",header=TRUE) %>% tbl_df
#md2<-mydata %>% mutate(Date=as.Date(as.character(Date),format="%b %d,%Y"))
#ggplot(md2,aes(x=Date,y=Price)) + geom_line()

###Data frame versiyonu

mydata<-read.table("~/Downloads/bcom.csv",sep=",",header=TRUE)
mydata$Date <- as.Date(as.character(mydata$Date),format="%b %d,%Y")
ggplot(mydata,aes(x=Date,y=Price)) + geom_line()