[问题类型]:
程式咨询(我想用R 做某件事情，但是我不知道要怎么用R 写出来)
[软件熟悉度]:
新手(没写过程式，R 是我的第一次)
[问题叙述]:
各位先进大家好，因为毕业专题要用到R，所以这几天正在练习跑资料
过程中有一个环节需要用到别人写好的方程式(PMD)，我想知道要如何将显示于萤
幕上面的那组数值存成向量，我上网也找了这个function的原始码可是我还是不知
道该如何提取我要的数值＠＠
我想要获得的向量如下面范例的结果 [1] 20 20 20 20 20
其他都不要，就是需要存成向量，然后因为资料很多笔，也无法用复制贴上的方式
附上这个function原本的code还有我觉得可能用得到的code @@
https://github.com/cran/FRAPO/blob/master/R/PMD.R
https://github.com/cran/FRAPO/blob/master/R/methods-PortSol.R
希望可以得到各位前辈的提点或是救援，谢谢各位
[程式范例]:
library(FRAPO)
R<-matrix(1:100, nrow = 20, ncol = 5)
PMD(R)
[环境叙述]:
> library(FRAPO)
> R<-matrix(1:100, nrow = 20, ncol = 5)
> R
[,1] [,2] [,3] [,4] [,5]
[1,] 1 21 41 61 81
[2,] 2 22 42 62 82
[3,] 3 23 43 63 83
[4,] 4 24 44 64 84
[5,] 5 25 45 65 85
[6,] 6 26 46 66 86
[7,] 7 27 47 67 87
[8,] 8 28 48 68 88
[9,] 9 29 49 69 89
[10,] 10 30 50 70 90
[11,] 11 31 51 71 91
[12,] 12 32 52 72 92
[13,] 13 33 53 73 93
[14,] 14 34 54 74 94
[15,] 15 35 55 75 95
[16,] 16 36 56 76 96
[17,] 17 37 57 77 97
[18,] 18 38 58 78 98
[19,] 19 39 59 79 99
[20,] 20 40 60 80 100
.
.
.
#######中间省略
.
.
.
Optimal solution found.
Optimal weights for porfolio of type:
Most Diversifified
[1] 20 20 20 20 20 ###我只需要这一行
[关键字]:
选择性，也许未来有用