2016年07月_lili_wuwu

原创 ggplot

install.packages("gcookbook")install.packages("ggplot2")library(ggplot2)library(gcookbook)x<-read.csv("G:/stock.csv",header=TRUE,sep=",")b<-as.Date(x$日期)#日期类型转换a<-data.frame(b,x[,-1])names(a)<-c

2016-07-28 23:31:19 1889

twoord.plot(lx,ly,rx,ry,data=NULL,main="",xlim=NULL,lylim=NULL,rylim=NULL, mar=c(5,4,4,4),lcol=1,rcol=2,xlab="",lytickpos=NA,ylab="",ylab.at=NA, rytickpos=NA,rylab="",rylab.at=NA,lpch=1,rpch=2, type="b",xtickpos=NULL,xticklab=NULL,halfwidth=0.4,axislab.

2016-07-17 22:32:18 3707

原创数据挖掘与R语言练习1

上海股票指数日线历史数据(1990-2015年)数据并且绘画其趋势图，在趋势图中用适当的方法标识出其最高股价和最低股价,并给出适当的结论。这个小练习没做成功，带以后完善~~x<- read.table('G:/数据分析课程/R语言项目/数据挖掘与R语言练习1/上海股票指数日线历史数据(1990-2015年).csv',header=T,sep=",")install.packages("gco

2016-07-15 00:25:40 2980

原创 R语言绘图-barplot()

1、柱状图语法： barplot(height, width = 1, space = NULL, names.arg = NULL, legend.text = NULL, beside = FALSE, horiz = FALSE, density = NULL, angle = 45, col = NULL, bord

2016-07-14 18:13:01 34707

原创 R函数-diag()

diag()提取或替换一个矩阵的对角线,或构造一个对角矩阵。语法： diag(x = 1, nrow, ncol) diag(x) <- value 解析： x：一个矩阵,向量或一维数组,或不填写。 nrow, ncol：可选行列。 value ：对角线的值，可以是一个值或一个向量。例子> x <- matrix(1:16,nrow=4,ncol=4)> x [,1]

2016-07-14 15:05:17 24124

原创 R函数-rev()、sort()

1、sort() 排序(或命令)一个向量或因素(部分)升序或降序排序。语法：sort(x, decreasing = FALSE/TRUE, …) 解析：decreasing = FALSE/TRUE –升序/降序排列> y <- c(5,6,7,4,5,4)> sort(x,decreasing=T)[1] 5 5 4 4 3 3 2 1> sort(x,decreasing=F)

2016-07-14 14:09:05 15907

原创 R函数-letters()、month.name()等几个内置函数

LETTERS[]: 26个大写字母; letters[]: 26个小写字母; month.abb[]: 英文月份缩写名称(三个字母); month.name[]: 一年的十二个月的英文名字; pi[]: 圆周率. 例：> LETTERS[10][1] "J"> LETTERS[1:30] [1] "A" "B" "C" "D" "E" "F" "G" "H" "I" "J"

2016-07-14 12:29:19 9803

原创 R函数-sql(),rep()

R中创建向量有三个函数，c(),seq(),rep()。今天学习下seq()和rep() 1、seq() 生成规律的序列语法： seq(from = 1, to = 1, by = ((to - from)/(length.out - 1)), length.out = NULL, …) 解释： from, to 开始和结束(最大)价值序列 by

2016-07-14 11:25:47 9113

原创 shell时间处理整理

关于shell的时间问题：先看几个小例子#!/bin/bashv_date=`date`echo "${v_date}"输出当天日期 #!/bin/bashv_date=`date '+%Y-%m-%d'`echo "${v_date}"#!/bin/bashv_date=`date +%Y-%m-%d`echo "${v_date}"输出当天日期控制格式为%Y-%m-%d 有无

2016-07-12 22:56:56 708

原创 R入门小练习（1）

今日： sapply() 、apply()、 list与向量的区别用昨天的例子，一、sapply() 、apply() 先做 name 的分词，看一下list和unlist在用sapply()做分词的区别>name <- strsplit(StuName," ")--列表格式>name1 <- unlist(strsplit(StuName," "))--非列表>firstname <

2016-07-10 00:16:55 647

原创 R入门小练习

一组学生参加了数学、科学和英语考试。为了给所有的学生确定一个单一的成绩衡量指标，需要将这些科目的成绩组合起来。另外，还想将前20%的学生评定为A，接下来20%的学生评定为B，以此类推。最后，希望按字母顺序对学生排序。1、数据录入>StuId <- c(1:10)>StuName <- c('John Davis','Angela Williams','Bull >Jones','

2016-07-09 02:17:58 3938

原创字符串转换为数值类型

字符串转换为数据今天遇到一个问题，字符串转换为数值类型报错：强制改变过程中产生了NA a <- ‘1/3’ as.numeric(as.character(a)) [1] NA Warning message: 强制改变过程中产生了NA 但数值型转换为字符却可以 b<-1/3 class(b) [1] “numeric” c<-as.charact

2016-07-07 01:29:44 9718

lili_wuwu的博客

原创统计学-时间序列知识点整理

转载转载很好的ggplot文章