This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.
When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
library(RCurl)
## Warning: package 'RCurl' was built under R version 3.1.2
## Loading required package: bitops
## Warning: package 'bitops' was built under R version 3.1.2
options(RCurlOptions = list(cainfo = system.file("CurlSSL", "cacert.pem", package = "Rcurl")))
#credentials$handshake()
#input data from .csv file
library(reshape2)
## Warning: package 'reshape2' was built under R version 3.1.2
BABA.data<-read.csv("D:\\R\\datasets\\table.csv",header=TRUE)
#change Date data type from factor to POSIXct
BABA.data$Date<-as.POSIXct(BABA.data$Date)
#subsract variable:volume
needdata<-data.frame(BABA.data$Date,BABA.data$Adj.Close)
names(needdata)<-c('Date','Adj.Close')
tempdata<-melt(needdata,id="Date")
You can also embed plots, for example:
require("ggplot2")
## Loading required package: ggplot2
#ggplot(tempdata,aes(x=Date,y=value))+geom_bar(stat="identity",colour="white",size=.01)+geom_point(size=4)+xlab("Date(daily)") + ylab("Price")+labs(title="Alibaba Group Holding Limited (BABA)")+theme(plot.title = element_text(lineheight=2, face="bold"))
ggplot(tempdata,aes(x=Date,y=value)) + geom_line(colour='blue')+geom_point(colour='red',size=2)+xlab("Date(daily)") + ylab("Price")+labs(title="Alibaba Group Holding Limited (BABA)")+theme(plot.title = element_text(lineheight=2, face="bold"))
Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.