法一：transdata
<-
function(x
)dr<- read.csv(
file
="/users/harriet/documents/r語言/xunhuan/gdp.csv")
transdata(dr)
district y2002 y2003 y2004 y2005 y2006 y2007 y2008 y2009 y2010 y2011
1 武漢市 na na na na na 3141.90 3960.08 4620.18 5565.93 6756.2000
2 黃石市 na na na na na 466.68 556.57 571.59 690.12 925.9600
3 襄陽市 na na na na na 785.45 1002.46 1201.01 1538.30 2132.2200
4 荊州市 na na na na na 519.63 623.98 709.58 837.10 1043.1200
5 宜昌市 na na na na na 820.90 1026.56 1272.33 1547.32 2140.6900
6 **市 na na na na na 411.42 487.64 550.96 736.78 851.2500
7 孝感市 na na na na na 480.79 593.06 672.88 800.67 958.1600
8 荊門市 na na na na na 420.08 520.36 600.10 730.07 942.5900
9 鄂州市 na na na na na 280.71 269.79 323.71 395.29 490.8900
10 黃岡市 na na na na na 473.74 600.75 730.19 862.30 1045.1100
11 咸寧市 na na na na na 286.75 359.19 418.45 520.33 652.1000
12 隨州市 na na na na na 257.62 310.20 341.91 401.66 517.9900
13 恩施州 na na na na na 210.35 249.18 294.26 351.13 418.1900
14 仙桃市 na na na na na 190.40 233.50 242.55 290.97 378.4500
15 潛江市 na na na na na 156.63 211.82 234.01 290.67 378.2100
16 天門市 na na na na na 151.48 187.35 186.86 219.48 274.5200
17 林 區 na na na na na 6.96 7.97 10.29 12.30 14.5301
18 高速公路 na na na na na na na na na na
法二：如果要讀入的檔案都在乙個資料夾中
transdata <- function(filename)
setwd("/users/harriet/documents/r語言/xunhuan/"). //設定統一的路徑，減少重複
lst <- list() //生成列表來儲存資料
for (i in dir()) lst[[which(i==dir())]] <- transdata(i). //將資料依次讀入乙個list中
dat3 <- cbind(表頭,a)
將資料型別轉換成字串，將字串轉換成資料型別
方法1 採用靜態方法 int a 123456789 string str string.valueof a 方法2 用包裝類轉換 float a 2.33f string str float.tostring a double a 2.33d string str double.tostring ...
巧妙利用引用，將陣列轉換成樹形陣列
筆者所做的乙個專案需要做乙個前端的樹形選單，後端返回的資料是乙個平行的list，list中的每個元素都是乙個物件，例如list 0 的值為，每個元素都指定了父元素，生成的選單可以無限級巢狀。一開始找的外掛程式需要手動將生成好的樹形陣列傳進去才能使用 儘管後來找到了乙個ui框架，可以直接傳list進去...
巧妙利用引用，將陣列轉換成樹形陣列
筆者所做的乙個專案需要做乙個前端的樹形選單，後端返回的資料是乙個平行的list，list中的每個元素都是乙個物件，例如list 0 的值為，每個元素都指定了父元素，生成的選單可以無限級巢狀。一開始找的外掛程式需要手動將生成好的樹形陣列傳進去才能使用 儘管後來找到了乙個ui框架，可以直接傳list進去...