數據分析學習第二講作業——Excel文件讀取

1.讀取Excel文件

在網上找到3種讀取Excel文件的方法，我都使用了一遍

方法一：（1）將".xlsx"文件另存為「.csv」文件

2.再使用「read.table()函數或者「read.csv()函數」導入「.csv文件」,並保存在數據框內

<1>.用read.table()函數

> mydata <- read.table("f:大數據病例數據.csv",header=TRUE,sep=",")n> mydatan

運行結果：

<2>.用read.csv()函數：

> patient <- read.csv("f:大數據病例數據.csv",header=TRUE,sep=",")n> patientn

運行結果：

(1)打開Excel表格，複製所有內容到剪貼板

(2)用用read.table()函數：

> patient <- read.table("clipboard",header = TRUE)n

運行結果：

操作如下：

> install.packages("openxlsx")n> library(openxlsx)n> read.xlsx("f:大數據病例數據.xlsx",sheet=1)n> mydata <-read.xlsx("f:大數據病例數據.xlsx",sheet=1)n> mydatan

運行結果：

3.獲取患者人數

> patientnumber <- nrow(patient)n> patientnumbern

運行結果：

[1] 4

4.提取所有患「1型糖尿病」患者數據

> type1 <- patient[mydata$糖尿病類型=="1型糖尿病",]n> type1n

病人編號 姓名 年齡 糖尿病類型 病情 病情.1

1 1 猴子 29 1型糖尿病 較差 Poor

3 3 王五 28 1型糖尿病 顯著好轉 Excellent

5.統計患「1型糖尿病」的患者人數

> type1.number <- nrow(type1)n> type1.numbern

運行結果：

[1] 2