感谢大鹏dapengde

创建数据

#在相应位置新建文件夹
dir.create('E:/R/R lab/学R/r4r')
#将数据文件存进文件夹
write.csv(as.data.frame(t(matrix(co2,12,dimnames = list(month.abb,unique(floor(time(co2)))  )
))),file = 'E:/R/R lab/学R/r4r/co2.csv')

读取数据

R数据的导入与导出(http://pem.freeshell.org/math/R_data_import_export_zh.pdf)

#读取文件
mydata1 <- read.table(file = 'clipboard',header = T)
#找到文件所在位置(点击式),myfile1和myfile2存储的只是路径,不是文件内容
myfile1 <- file.choose()
myfile2 <- "E:\\R\\R lab\\学R\\r4r\\co2.csv"
mydata2 <- read.table(file = myfile2,header = T,sep = ',')
#read.csv()比read.table()更精简
mydata2 <- read.csv(file = myfile2)
mydata2 <- read.csv(file = "E:\\R\\R lab\\学R\\r4r\\co2.csv")

常见的符号

%/% 整除的商;
%%整除的余数;
round()四舍五入;
trunc()截取整数;
mod()整除的余数

数据处理和作图

plot(mydata2)

> #对于有名称的查询某行或某列的数据
> mydata2[,'Sep'][1] 313.68 314.00 314.83 316.11 316.05 316.54 317.66 318.48 319.10 320.18 322.22
[12] 322.93 323.20 324.68 327.35 327.27 328.40 329.14 331.42 332.60 333.75 335.72
[23] 336.52 337.81 339.69 340.90 342.92 344.68 346.27 348.55 349.64 350.82 352.05
[34] 352.94 353.67 355.84 358.11 359.51 360.24
mydata2$Sep
> #对矩阵行进行命名
> rownames(mydata2) <- mydata2$year
> rownames(mydata2)[1] "1959" "1960" "1961" "1962" "1963" "1964" "1965" "1966" "1967" "1968" "1969" "1970" "1971"
[14] "1972" "1973" "1974" "1975" "1976" "1977" "1978" "1979" "1980" "1981" "1982" "1983" "1984"
[27] "1985" "1986" "1987" "1988" "1989" "1990" "1991" "1992" "1993" "1994" "1995" "1996" "1997"
> colMeans(mydata2[,2:13])Jan      Feb      Mar      Apr      May      Jun      Jul      Aug      Sep      Oct
336.4308 337.2033 338.0546 339.2944 339.8821 339.3282 337.9164 335.9579 334.2428 334.1692 Nov      Dec
335.4679 336.6946
> #对数据行计算均值,添加到mydata2的变量mean中去
> mydata2$mean<- rowMeans(mydata2[,2:13])
> #对数据行计算中值,添加到mydata2的变量median中去
> mydata2$median <- apply(X=mydata2[,2:13],FUN = median,MARGIN = 1)
> #任意相邻两行的差,diff()函数,后项减去前项
> diff(mydata2$Sep)[1]  0.32  0.83  1.28 -0.06  0.49  1.12  0.82  0.62  1.08  2.04  0.71  0.27  1.48  2.67 -0.08
[16]  1.13  0.74  2.28  1.18  1.15  1.97  0.80  1.29  1.88  1.21  2.02  1.76  1.59  2.28  1.09
[31]  1.18  1.23  0.89  0.73  2.17  2.27  1.40  0.73

#对数据行进行计算相邻两项的差,也就是计算每年中,下月减本月,少的是一月
apply(X=mydata2[,2:13],FUN = diff,MARGIN = 1)
#对数据列进行计算相邻两项的差,也就是计算每月中,下年减本年,少的是1959年
apply(X=mydata2[,2:13],FUN = diff,MARGIN = 2)

R不仅可以安装在本地,还可以从网络访问。在你的手机或电脑里打开浏览器,访问下面介绍的网站,就可以使用R语言了。

我们先来试试Ideone。(Ideone: http://ideone.com)打开这个网站后,输入

summary(co2)
co2

点击Run!按钮运行,窗口下面就立刻显示运算结果。同时,可以让我们用浏览器来进行R编程和调试非常方便,免费注册账号后,就可以将代码保存在名下,方便调用,还支持把代码嵌入网页里,以便分享。

由于输入输出接口的限制,Ideone里的R语言不能读入外部数据,也不能实现作图。没关系,还有很多类似网站,能够满足不同的需求,例如r-fiddle(r-fiddle: http://www.r-fiddle.org)等。如果你有自己的服务器,那么还可以用RStudio的服务器版来搭建自己专属的R网站,你的地盘你做主。有了这些在线的R网站,随时随处都可以免费使用R,没有电脑就用手机。有R伴我走天涯,走到哪里都不怕。

大鵬志:http://dapengde.com/archives/tag/r
本书主頁: http://xuer.pzhao.net
大鹏推荐的书http://xccds1977.blogspot.com/2013/02/r.html
统计之都:https://d.cosx.org/t/r
爆栈网R语言论坛:http://stackoverflow.com/questions/tagged/r

R入门(一)----读取数据、查看数据相关推荐

  1. 使用R读取并查看数据

    本篇文章介绍如何使用R读取并查看数据,包含一些最基础的函数使用方法和说明.后面还会陆续介绍数据清洗,匹配和提取等相关的操作. 查看函数帮助 对于新手来说,在使用R时最重要的是了解不同函数的使用方法.很 ...

  2. python数据分析第一步:读取以及查看数据

    用python做数据分析第一步,通常会遇到需要将现成文件(数据库里导出来,或者其他情况下获得的各种文件)拿来处理分析的情况,下面来说下利用python的标准库pandas来读取以及查看数据的方法 1. ...

  3. R语言批量读取写入Excel数据 r导出输出写入excel多个sheet 导出excel 导入 excel 读入excel 表格

    前一段,写过一篇:R语言中写入Excel的不同sheet表格,最近学习了tidyverse的方法,感觉需要总结一下,更新一下知识结构. 本文准备用实际数据,做一下操作: 「批量读取:」 批量读取多个E ...

  4. webaudio ajax,Web Audio 入门之读取左右声道数据

    说到音频,大家应该立刻会想到Audio,和Audio标签完全不同,Web Audio的功能更为强大.Audio 和 Web Audio的关系,就像img和canvas的关系一样. Web Audio ...

  5. R语言处理数据——查看数据缺失位置及替换

    查看数据缺失位置及替换 #查看geno.1中缺失所在列 which(colSums(is.na(geno.1))==T)#查看geno.1中缺失所在行 which(rowSums(is.na(geno ...

  6. R语言批量读取写入Excel数据

    本文准备用实际数据,做一下操作: 「批量读取:」 批量读取多个Excel数据 批量读取一个Excel数据的不同表格 「批量写入」 批量写入Excel数据 1,批量写入到不同的Excel中 2,批量写入 ...

  7. plc tcp ip通讯怎么只能连一个客户端_如何远程读取西门子PLC数据?

    随着工业的发展,PLC联网进行远程监控.远程运维的需求越来越多,通常是通过PLC的通信口外接一个联网模块来实现.很多企业自动化产品与非标自动化产品安装现场地处偏僻,没有网络怎么办?随着本地通信控制的局 ...

  8. thymealf如何实现传单个变量给html_如何远程读取西门子PLC数据?

    随着工业的发展,PLC联网进行远程监控.远程运维的需求越来越多,通常是通过PLC的通信口外接一个联网模块来实现.很多企业自动化产品与非标自动化产品安装现场地处偏僻,没有网络怎么办?随着本地通信控制的局 ...

  9. R语言入门——数据快速读取与查看(含实例代码和参数讲解)

    R语言数据读取 介绍 引言 结构安排 数据读取函数 文本数据 readLines函数 键盘键入数据 scan函数讲解 表格数据 .xlsx文件介绍 表格数据函数参数介绍 快速读入参数介绍 竞赛数据练习 ...

  10. r mysql utf8_R读取MySQL数据出现乱码,解决该问题的方法总结

    R读取MySQL数据出现乱码,解决该问题的方法总结 我用的都是utf-8编码,电脑系统win7, MySQL-Front进行数据库的可视化. 1.我用的是RStudio,先去设置R的默认编码: Too ...

最新文章

  1. 字符串-验证回文串(双指针法)
  2. comsol如何设置距离梯度_如何在 COMSOL 软件中设置“优质的”CFD 网格
  3. 网络流 24 题汇总(LOJ 上只有 22 题???)
  4. 设计模式java装饰模式范例_Java设计模式之装饰模式详解
  5. equals方法的重写
  6. python调用库实现返回ping的时延_python网络作业:使用python的socket库实现ICMP协议的ping...
  7. python regex_Python 正则表达式
  8. ☆☆在Eclipse中编译NDK的so文件(普通安卓项目转换为NDK项目的设定)
  9. python高阶函数、map reduce 自己如何去定义_「python」高阶函数map、reduce的介绍
  10. Android中ICS4.0源码Launcher启动流程分析【android源码Launcher系列一】
  11. qq视频转码失败怎么办_迅捷视频转换器转换失败的解决方法
  12. 两个分数化简比怎么化_分数化简比的方法什么,六年级上求比值与化简比的对比...
  13. matlab如何按行查找重复值?
  14. [kubernetes]-kubernetes+nfs创建高可用mysql
  15. Siebel 数学运算
  16. 北漂四年,25K,程序员,我依然单身!
  17. 2018年实现营收79.17亿元,科大讯飞能否决胜于人工智能时代?
  18. BTT假币攻击事件细节披露及修复方案
  19. 程序猿眼中的《长安十二时辰》
  20. micorpython固件DIY

热门文章

  1. 按如下函数原型编程从键盘输入一个m行n列的二维数组,然后计算数组中元素的最大值及其所在的行列下标值。其中,m和n的值由用户键盘输入。已知m和n的值都不超过10。
  2. 微应用 qiankun 项目搭建
  3. Lux 安装以及使用
  4. COVID-19 paper
  5. 常见的网站推广方法有哪些?
  6. i511320h和锐龙r75800h性能 r7 5800h和 i5 11320h 评测
  7. 一文了解RT8059GJ5
  8. 一位台湾学校校长的演讲
  9. DA14580软件开发平台参考(一)
  10. VIVADO+ZYNQ7000入门三,PS与PL的联合开发