专栏首页YoungGyR语言_基础

R语言_基础

a = c(1,2,3)

#查看帮助
help(mean)
?mean
example(mean)
help.start()
help(package="plyr")
help(baseball)  查看plyr包下面的baseball数据集的描述

#工作空间
getwd() 
setwd(“c:/myproject”) 
ls()    #列出当前工作空间中的对象
rm(list=ls())
dir()   #列出当前目录
dir.create(“c:/myproject”)
options()           #查看R软件默认选项的设置
options(digits=3)   #保留3为小数
data()  #展示已经加载的数据集
save.image("mylife")    #保存工作空间到mylife文件中
load("mylife")      #载入工作空间

#输入与输出
#重定向至文本文件和图像文件
source("inputFile.R")
sink("outFile",append=TRUE,split=TRUE)
pdf("outPic.pdf")
jpeg("outPic.jpg")
postscript("filename.ps")
#利用键盘编辑小数据
mydata = edit(mydata)
fix(mydata)
#读取文本文件
mydataframe = read.table(file,header=TRUE,sep="delimiter",row.names="name",stringsAsFactors=FALSE)
#一个例子
sink("myout.txt",split=TRUE)
pdf("myout.pdf")
source("s1.R")
sink()
dev.off()   #文本输出至myout.txt,图形输出至myout.pdf

#处理对象的实用函数
length
dim
str
class
mode
names
c(obj1,obj2)
cbind(obj1,obj2)
rbind(obj1,obj2)
head
tail
ls()
rm(obj1,obj2)

#批处理
R CMD BATCH options infile outfile #linux
"c:\program\r\r.exe" CMD BATCH --vanilla --slave "c:\myscript.R"

#查看变量属性
mode(a) 
class(a) 
is.numeric(a)
is.character(a)

#算术与逻辑运算
1 == 1
1 != 2
TRUE & TRUE
TRUE | FALSE
! TRUE

#数据集标注,采用值标签
patient$gender = factor(patient$gender,levels=c(1,2),labels=c("male","female"))


#全局统计
data
library(MASS)
data(Insurance)
str(Insurance)
names(Insurance)
summary(Insurance)



#抽样
sub1 = sample(nrow(Insurance),10,replace=TRUE)
Insurance[sub1,]        #利用抽样技术随机获取子集
index = sample(2,nrow(Insurance),replace=TRUE,prob=c(0.8,0.2))
Insurance[index==1,]
Insurance[index==2,]    #利用抽样技术对数据进行分区管理

#R基本画图plot()函数
#par()对R图形进行修饰
dose <- c(20, 30, 40, 45, 60)
drugA <- c(16, 20, 27, 40, 60)
drugB <- c(15, 18, 25, 31, 40)
opar <- par(no.readonly = TRUE)
par(mfrow=c(1,2))
par(pin=c(2,3))
par(lwd=2, cex=1.5)
par(cex.axis=0.75, font.axis=3)
plot(dose, drugA, type=”b”, pch=19, lty=2, col=”red”)
plot(dose, drugB, type=”b”, pch=23, lty=6, col=”blue”, bg=”green”)
par(opar)
par(mfrow=c(1,1))

#R函数定义与实现
#R函数调用
sum.of.squares <- function(x,y) {
x^2 + y^2
}
sum.of.squares(3, 4)

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

推荐阅读

  • 远程办公经验为0,如何将日常工作平滑过度到线上?

    我是一名创业者,我的公司(深圳市友浩达科技有限公司)在2018年8月8日开始运营,现在还属于微型公司。这个春节假期,我一直十分关注疫情动向,也非常关心其对公司带来的影响。

    TVP官方团队
    TAPD 敏捷项目管理腾讯乐享企业邮箱企业编程算法
  • 数据中台,概念炒作还是另有奇效? | TVP思享

    作者简介:史凯,花名凯哥,腾讯云最具价值专家TVP,ThoughtWorks数据智能业务总经理。投身于企业数字化转型工作近20年。2000年初,在IBM 研发企业级中间件,接着加入埃森哲,为大型企业提供信息化架构规划,设计,ERP,云平台,数据仓库构建等技术咨询实施服务,随后在EMC负责企业应用转型业务,为企业提供云迁移,应用现代化服务。现在专注于企业智能化转型领域,是数据驱动的数字化转型的行业布道者,数据中台的推广者,精益数据创新体系的创始人,2019年荣获全球Data IQ 100人的数据赋能者称号,创业邦卓越生态聚合赋能官TOP 5。2019年度数字化转型专家奖。打造了行业第一个数据创新的数字化转型卡牌和工作坊。创建了精益数据创新方法论体系构建数据驱动的智能企业,并在多个企业验证成功,正在向国内外推广。

    TVP官方团队
    大数据数据分析企业
  • 扩展 Kubernetes 之 CRI

    使用 cri-containerd 的调用流程更为简洁, 省去了上面的调用流程的 1,2 两步

    王磊-AI基础
    Kubernetes
  • 扩展 Kubernetes 之 Kubectl Plugin

    kubectl 功能非常强大, 常见的命令使用方式可以参考 kubectl --help,或者这篇文章

    王磊-AI基础
    Kubernetes
  • 多种登录方式定量性能测试方案

    最近接到到一个测试任务,某服务提供了两种登录方式:1、账号密码登录;2、手机号+验证码登录。要对这两种登录按照一定的比例进行压测。

    八音弦
    测试服务 WeTest
  • 线程安全类在性能测试中应用

    首先验证接口参数签名是否正确,然后加锁去判断订单信息和状态,处理用户增添VIP时间事务,成功之后释放锁。锁是针对用户和订单的分布式锁,使用方案是用的redis。

    八音弦
    安全编程算法
  • 使用CDN(jsdelivr) 优化博客访问速度

    PS: 此篇文章适用于 使用 Github pages 或者 coding pages 的朋友,其他博客也类似.

    IFONLY@CUIT
    CDNGitGitHub开源
  • 扩展 Kubernetes 之 CNI

    Network Configuration 是 CNI 输入参数中最重要当部分, 可以存储在磁盘上

    王磊-AI基础
    Kubernetes
  • 聚焦【技术应变力】云加社区沙龙online重磅上线!

    云加社区结合特殊时期热点,挑选备受关注的音视频流量暴增、线下业务快速转线上、紧急上线防疫IoT应用等话题,邀请众多业界专家,为大家提供连续十一天的干货分享。从视野、预判、应对等多角度,帮助大家全面提升「技术应变力」!

    腾小云
  • 京东购物小程序购物车性能优化实践

    它是小程序开发工具内置的一个可视化监控工具,能够在 OS 级别上实时记录系统资源的使用情况。

    WecTeam
    渲染JavaScripthttps网络安全缓存

扫码关注云+社区

领取腾讯云代金券