R软件学习.2010.0118_001

 

以运行程序的方式介绍R软件的功能

首先是引例

R version 2.10.1 (2009-12-14)

Copyright (C) 2009 The R Foundation for Statistical Computing

ISBN 3-900051-07-0

 

R 是自由软件软件，不带任何担保。

在某些条件下你可以将其自由散布。

用 'license()' 或 'licence()' 来看散布的详细条件。

 

R 是个合作计划，有许多人为之做出了贡献 .

用 'contributors()' 来看合作者的详细情况

用 'citation()' 会告诉你如何在出版物中正确地引用 R 或 R 程序包。

 

用 'demo()' 来看一些示范程序，用 'help()' 来阅读在线帮助文件，或

用 'help.start()' 通过 HTML 浏览器来看帮助文件。

用 'q()' 退出 R.

> 引例

> help.start()

starting httpd help server ... 做完了。

如果什么都不发生的话，你应该自己打开 'http://本地电脑中的位置/doc/html/index.html'

> X1<-c(35,40,40,42,37,45,43,37,44,42,41,39)

> mean(X1)

[1] 40.41667

> sd(X1)

[1] 3.028901

> # R软件中注释用“ # ”号标出

> X2<-c(60,74,64,71,72,68,78,66,70,65,73,75)

> plot(X1,X2) # 画图

> hist(X1) # 直方图

> rt<-read.table("exam1.txt",head=TRUE);

错误于 file(file, "rt") : 无法打开链结

此外 : 警告信息：

In file(file, "rt") : 无法打开文件 'exam1.txt': No such file or directory

> # 此处出错原因是没有把路径设置到 exam1.txt 所在位置

> rt<-read.table("exam1.txt",head=TRUE);

> rt

    Name Sex Age Height Weight

1  Alice   F  13   56.5     84

2  Becka   F  13   65.3     98

3   Gail   F  12   64.3     90

4  Karen   F  14   56.3     77

5   John   M  12   59.0     99

6 Philip   M  13   72.0    128

7 Robert   M  12   64.8     85

8 Thomas   M  14   57.5    112

> lm.sol<-lm(Weight~Height,data=rt) # 线性回归

> summary(lm.sol)

 

Call:

lm(formula = Weight ~ Height, data = rt)

 

Residuals:

    Min      1Q  Median      3Q     Max

-16.558 -10.008  -3.778   9.125  23.133

 

Coefficients:

            Estimate Std. Error t value Pr(>|t|)

(Intercept)  -11.089     62.255  -0.178    0.864

Height         1.738      1.001   1.736    0.133

 

Residual standard error: 14.71 on 6 degrees of freedom

Multiple R-squared: 0.3344,     Adjusted R-squared: 0.2235

F-statistic: 3.015 on 1 and 6 DF,  p-value: 0.1332

>fix(rt)  # 可修改 rt 表中数据