getwd()
setwd(「c:/users/chunbaizhi/r106/r」)
#目錄/修改目錄
install.packages(「stringr」)
#安包remove.packages(「stringr」)
#刪包library()
#檢視全部包
library(「stringr」)
#調包search()
#檢視調的包
detach(「package:stringr」)
#取消呼叫
#賦值使用 <-
#na（缺失值），用來替補所有應有資料位置的值
#null（空值）， 不會被視為乙個值（如計算向量長度時不計算在內）
#nan，無意義的值（如0/0），會被視為乙個值
#邏輯運算子 例如：&（與，正常判斷符） &&（與，只判斷第乙個元素）等等
#向量a <- c(2,3,4)#乙個三元素向量，向量元素下標是從1開始的,可重複訪問，可不連續訪問
a[1]
seq(1,9,by=2)#建立乙個1到9的等差數列，公差為2
rep(a,3)#建立乙個複製重複向量的向量
new.a <- c()#建立空向量
aa <- c()#似乎沒區別
aa = sample(c(17,18,19),10,replace=t);a#隨機函式，建立值為17，18，19的10個數字，t，可以重複取值
a = sample(c(17,18,19),10,replace=f);a
all(a>18)#對向量所有元素進行判斷
a>18
a <- matrix(1:18,nrow=2)#把向量按照規律變換成矩陣,行數*列數等於向量元素總數(優先列排排)
aa <- matrix(1:18,nrow=3)
aa <- a[,2]#切片[行，列]
aa[a%%3==0 & a>5]
a[2,3]
a <- matrix(1:18,nrow=2)#把向量按照規律變換成矩陣,行數*列數等於向量元素總數(優先列排排)
aa <- matrix(1:18,nrow=3)
aa <- a[,2]#切片[行，列]
a#應用：修改 package:pixmap
library(pixmap)
p<-read.pgm(「python.pgm」)
p#使用矩陣
plot§
str§
p2 <-p
p2@grey[80:103,10:60] <-1
plot(p2)
a <- matrix(1:12, nrow = 3)
ab <- matrix(21:26, nrow = 3)
bcbind(a,b)
rbind(a,b)
b <- matrix(21:24,nrow = 1)
brbind(a,b)
#列表list <- list(name=「gegege」,id=1001, is.past.exam=t)
list
list2 <- list(「gegege」,1001,t)#可以不加標籤
list2
list <- list(name=c(「gegege」,「gagaga」),id=1001, is.past.exam=t)
list
new <- vector(mode=「list」)#建立乙個空列表
newc(a,b)#拼接列表
list<-list(a,b)#列表的元素可以是列表
#列表轉向量
c <- unlist(a)
#資料框（建表）
a.name<-c(「xiaoming」,「xiaohong」)
a.id <- c(1001,1002)
a.info <- data.frame(a.name,a.id)
a.info
str(a.info)
#新增一列
a.infokatex parse error: expected 'eof', got '#' at position 23: …(17,18) a.info #̲查詢 a.info[which…age>=18),]
a.info[a.info$age>=18,]
#矩陣轉資料框
mat <- matrix(1:12,nrow=3)
matmat.df <- as.data.frame(mat)
mat.df
#merge 根據值拼接列表
a.id.math <- c(1001,1003)
a.math.score <- c(89,90)
a.math.df <- data.frame(a.id.math,a.math.score)
a.math.df
a.info
merge(a.info,a.math.df, by.x=「a.id」,by.y=「a.id.math」)
#因子(指去重後的元素)
*** <- c(1,2)
******.f <- factor(***)
***.f
str(***.f)
stu.*** <- sample(1:2,10,replace = t); stu.***
stu.***.f<-factor(stu.***); stu.***.f
stu.***.f<- factor(stu.***, levels = c(1,2));stu.***.f
stu.***.f<- factor(stu.***,levels = c(1,2),labels = c(「t」,「f」));stu.***.f
stu.***.v<- as.vector(stu.***.f);stu.***.v
今天開始學習swift
嗯，為了更好地利用xcode，oc和swift必須學一門。像我，也不為找工作也不創業的，就輕率地做了個決定，學swift吧。為了不讓自己半途而廢，特此寫個部落格。應該沒有人會看到吧，畢竟這個實在拿不上檯面。好羞恥，寫給我自己看！加油！嗯，看了一會兒，我就產生了疑問 q1 func greet nam...
今天開始學習python
1.遇到的第乙個問題，anaconada安裝好後用命令列啟動報錯，於是改用anaconda prompt啟動，鍵入conda upgrade all更新後，不報錯了，於是再用命令列啟動，問題解決了，不再報錯。anaconda所謂的建立虛擬環境其實就是安裝了乙個真實的python環境,只不過我們可以通...
1 今天開始學習python
恢復內容開始 今天開始學習python，先要看python核心程式設計第二版，把裡面的知識點全部學完。並且在部落格上做筆記。c python27 lib idlelib 在python安裝目錄下的lib idlelib目錄下，有個ldl.pyw檔案。這個就是python的開發環境。可以雙擊開啟，或者...