[問題類型]:
程式諮詢(我想用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 ###我只需要這一行
[關鍵字]:
選擇性，也許未來有用