R基本语法

Posted 2021-12-02 jianiliunier

刚开始写代码，一些遇到的问题和自己整理的小帖子。

 

1.数据类型转换

as.character(x)  转为字符型

as.complex(x)

as.numeric(x) 或者 as.double(x) 

as.integer(x) 转为整数值

as.logical(x)  转为逻辑值（TURE ,FALSE)

2.检测数据类型

is.numeric(), 

is.character(), 

is.vector(), 

is.matrix(), 

is.data.frame()

3.怎么比较两个数是否相同返还逻辑值？

使用函数all( );

for example: 

a=“hello_world”; 

b=“hello_world”;

c="2"; 

d=2;   #(在这里注意c和d数据类型不同，需要变化其中一个的数据类型，保持一致）

all(a==b,as.integer(c)==c‘d)

结果为 TURE

4.如何忽略或者替换字符型数据中的空格？

替换为“_”时，

b="hello world",

b=gsub("([N ])", "_", b);

结果为 b="hello_world"

忽略时；

b="hello world",

b=gsub("([N ])", "", b);

结果为 b="helloworld"

5. 怎么对一个文件夹下的不同文档进行处理？（在这里我们假设在"F:/image"文件夹下有一个图像数据集）

setwd("F:/image")#设置工作空间到"F:/image"

library(jpeg)#添加要读取jpg 的readJPEG的库

filelist <- list.files(getwd());#获取当前工作路径的文件列表

dir=paste("F:/image/",filelist,sep="")#获取当前工作路径的文件列表的路径

N<-length(dir);#获取当前工作路径的文件列表的数目

for(i in 1:N)

{

image<- readJPEG(filelist[i],native=FALSE);#读取jpg 图形

merge.data<-rbind(merge.data,image);# rbind 为按行合并，cbind为按列合并

}

6. 如何对一个向量进行随机采样？

M=50；

 s2<-c(1:M); #产生从1到M的顺序向量

  s2<-s2[sample(length(s2), 10) ] #从s2向量中随机采样长度为10的向量赋给s2.