wnfd

回复 第2楼 的 frank230：可以不针对这个题目，写出一个函数吗？

多谢各位。我会整理一下，写出mapply的。

mapply(Matrix, colfactor, rowfactor, function(submatrix))。

我今天遇到了一个问题。

name A A B C C C

SF1 680.11 904.46 843.50 1288.24 1162.20 843.82

SRSF11 1075.75 872.80 758.74 936.98 763.94 818.37

SRSF11 1075.75 872.80 758.74 936.98 763.94 818.37

SRSF12 715.56 696.64 695.58 687.81 759.67 715.00

SRSF12 28.50 16.13 18.50 17.38 22.50 21.00

FOX1 134.48 134.86 150.68 114.23 111.77 157.93

FOX1 138.58 135.08 150.40 115.02 114.02 155.38

PRPF3 503.24 213.47 169.97 179.71 255.57 216.32

FOX2 91.55 193.67 214.80 271.79 317.23 249.17

FOX2 92.17 239.50 261.42 317.08 382.00 180.50

请问如何 得出 一个列名为 A, B, C，行名为 SF1, SRSF11, SRSF12, FOX1, PRPF3, FOX2 的矩阵？(A列SF1的值表示 数据中所有值的平均值。)

其实就是矩阵分块运算，如何告诉一个行factor和一个列factor，然后用tapply()。

我想写一个类似tapply的函数实现功能： mtapply(M, col.index, row.index, function)，但是水平有限。请大家帮忙。

6L的方法简单，我今天也遇到了一个问题。

name A A B C C C

SF1 680.11 904.46 843.50 1288.24 1162.20 843.82

SRSF11 1075.75 872.80 758.74 936.98 763.94 818.37

SRSF11 1075.75 872.80 758.74 936.98 763.94 818.37

SRSF12 715.56 696.64 695.58 687.81 759.67 715.00

SRSF12 28.50 16.13 18.50 17.38 22.50 21.00

FOX1 134.48 134.86 150.68 114.23 111.77 157.93

FOX1 138.58 135.08 150.40 115.02 114.02 155.38

PRPF3 503.24 213.47 169.97 179.71 255.57 216.32

FOX2 91.55 193.67 214.80 271.79 317.23 249.17

FOX2 92.17 239.50 261.42 317.08 382.00 180.50

请问如何 得出 一个列名为 A, B, C，行名为 SF1, SRSF11, SRSF12, FOX1, PRPF3, FOX2 的矩阵？(A列SF1的值表示 数据中所有值的平均值。)

自己想到了一个方法就是运用2次6L的方法。还有没其他的方法呢？

回复 第4楼 的 wnfd：解决了，没好好看scan的选项...

就这么简单：a <- scan(what = character(0))

回复 第2楼 的 Ihavenothing：不能输入字符串...只可以数字？？

回复 第2楼 的 Ihavenothing：非常感谢,回复的这么快。。。

有什么包或者函数可以实现下面的功能：

#this is a R script

print('please put in a number:')

a <- get() # 就是在运行程序时，等待用户输入!像 C,python,java中就有。get 是我瞎写的...

我也加入了...

getopt 很简单呀，很好用。就是对Rscript 的扩展~~和python中的opt一样的用法。

pdf 根本看不到，没法参与了...

回复 第7楼 的 谢益辉：太有用了。我本来还疑惑a的长度不知道怎么办呢。