[問題] 資料處理及function問題

[PILIPALAPON (pilipalapon)]

[問題類型]:

程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)


[軟體熟悉度]:

入門(寫過其他程式，只是對語法不熟悉)

[問題敘述]:
請簡略描述你所要做的事情，或是這個程式的目的

ID   性別     年齡   號碼
 1      F       23      2
 1      F       30      2
 1     M       32     2
 2     M      32     1
 2      F       23      1
 3      M      56     1
 3      F       23      1
 3      M      18     1
 4      M      12     4
 4      F       32      4
 4      M      65     4
 4      F       45      4
 4      M      42     4


有一個資料檔，我有三個方案。

方案A同ID的年齡遞增排序，再用號碼變數*0.5四捨五入的數字選取那一列。
方案B同ID的年齡遞減排序，再用號碼變數*0.9四捨五入的數字選取那一列。
方案C同ID的年齡遞減排序，再用號碼變數的數字選取那一列。

例如方案C
同ID下年齡遞減排序
ID  性別 年齡 號碼
1        M     32     2
1         F     30     2
1         F     23     2
2       M     32      1
2        F     23      1
3      M      56     1
3       F      23      1
3      M      18      1
4      M      65     4
4      F       45     4
4      M      42     4
4      F       32     4
4      M      12     4
排完後依照號碼變數選該列
ID  性別 年齡 號碼
1         F     30     2
2       M     32      1
3       M     56     1
4        F     32     4

我希望用function寫輸入方案A即可得到方案A選出的人。



[環境敘述]:
R 3.2.3

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 49.159.82.227
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1457542410.A.9FA.html
→ celestialgod: 可以給一個例子示範嗎？
→ celestialgod: 用其中一個方案就好
→ celestialgod: http://pastebin.com/NDEpHW5X
→ celestialgod: 沒有更多資訊下，只能先給你這樣，哪裏不符合預期再
→ celestialgod: 修文告知，謝謝
※ 編輯: PILIPALAPON (117.19.243.78), 03/10/2016 01:46:46
→ celestialgod: 函數不明白，可以去看我上一篇簽名的套件介紹
→ celestialgod: 這篇，一樣你問的 #1MVG1GCH (R_Language)
→ celestialgod: 我用summarise_each處理，更簡潔
→ celestialgod: 稍微改一下套進去switch就好
→ celestialgod: #XXXXXXX 這個是索引碼，在看板按下#鍵入後面一串英
→ celestialgod: 文就可以到該篇文章
※ 編輯: PILIPALAPON (117.19.243.78), 03/10/2016 01:47:18
※ 編輯: PILIPALAPON (117.19.243.78), 03/10/2016 01:48:46
→ celestialgod: summarise_each已經更新在pastebin上了
→ PILIPALAPON: C大用的dplyr我有看過了～只是我剛好卡在function sw
→ PILIPALAPON: itch部分 例子已補上
→ celestialgod: 好，你再看看，哪裏不符合需求，再跟我說XD
→ PILIPALAPON: 解出來了～萬分感謝!