title: Create an "Other" category by summing in dplyr
body: <p>I have the following dataset with ID's and a numeric value per ID. I require to show the top 10 of largest ID's and group the rest under an &quot;Other&quot; category.</p>
  <p>I have researched <a href="https://stackoverflow.com/a/35114679/7044446">this</a> question/answer but it works with counts instead of sums. So that approach wont work for my case</p>
  <p>My desired result</p>
  <pre><code>ID          Value
  63366849    42084408
  63475529    21879648
  6774736     21321888
  91274582    17393328
  63445915    15215002
  1097911044  9926442
  1095812405  8971332
  1097910557  5388376
  37548920    5114854
  OTHERS      153587848
  </code></pre>
  <p>My data:</p>
  <pre><code>df=structure(list(ID= c(&quot;63366849&quot;, &quot;63475529&quot;, &quot;6774736&quot;, 
  &quot;91274582&quot;, &quot;63445915&quot;, &quot;1097911044&quot;, &quot;1095812405&quot;, &quot;1097910557&quot;, 
  &quot;37548920&quot;, &quot;1005153076&quot;, &quot;13513021&quot;, &quot;51991938&quot;, &quot;1010090155&quot;, 
  &quot;91265898&quot;, &quot;91237574&quot;, &quot;91344448&quot;, &quot;1095956598&quot;, &quot;28065538&quot;, 
  &quot;63341531&quot;, &quot;63335642&quot;, &quot;5637749&quot;, &quot;17419836&quot;, &quot;5567029&quot;, &quot;5651301&quot;, 
  &quot;37839500&quot;, &quot;63450446&quot;, &quot;28424298&quot;, &quot;29264885&quot;, &quot;63328148&quot;, &quot;63562603&quot;, 
  &quot;51702988&quot;, &quot;7416450&quot;, &quot;1005234045&quot;, &quot;91520220&quot;, &quot;91159937&quot;, 
  &quot;13801492&quot;, &quot;9260536&quot;, &quot;37722978&quot;, &quot;63355924&quot;, &quot;1098711718&quot;, 
  &quot;63443769&quot;, &quot;60306461&quot;, &quot;28485149&quot;, &quot;2151526&quot;, &quot;2127233&quot;, &quot;1096063398&quot;, 
  &quot;27948572&quot;, &quot;13834945&quot;, &quot;27938888&quot;, &quot;91179848&quot;, &quot;41678031&quot;, &quot;37837953&quot;, 
  &quot;91233367&quot;, &quot;5557908&quot;, &quot;28012681&quot;, &quot;33446782&quot;, &quot;91243709&quot;, &quot;1007790961&quot;, 
  &quot;1095826946&quot;, &quot;1095926858&quot;, &quot;20189860&quot;, &quot;24049724&quot;, &quot;27903426&quot;, 
  &quot;28133395&quot;, &quot;41446577&quot;, &quot;37319481&quot;, &quot;2033552&quot;, &quot;27950302&quot;, &quot;91200190&quot;, 
  &quot;91205127&quot;, &quot;9527919&quot;, &quot;1095303440&quot;, &quot;13826841&quot;, &quot;91218008&quot;, 
  &quot;63280472&quot;, &quot;24074310&quot;, &quot;37805433&quot;, &quot;13801074&quot;, &quot;28037341&quot;, &quot;63353740&quot;, 
  &quot;1095793583&quot;, &quot;1102371309&quot;, &quot;1116493966&quot;, &quot;2127316&quot;, &quot;2153230&quot;, 
  &quot;37316948&quot;, &quot;51778219&quot;, &quot;5503745&quot;, &quot;1099735096&quot;, &quot;1222254600&quot;, 
  &quot;27786180&quot;, &quot;2162536&quot;, &quot;27964677&quot;, &quot;2020408&quot;, &quot;91349686&quot;, &quot;37514200&quot;, 
  &quot;30208806&quot;, &quot;1102351224&quot;, &quot;28354311&quot;, &quot;27929976&quot;, &quot;63523710&quot;, 
  &quot;13838438&quot;, &quot;28296329&quot;, &quot;28410262&quot;, &quot;28494063&quot;, &quot;5721778&quot;, &quot;91275248&quot;, 
  &quot;91353706&quot;, &quot;37751608&quot;, &quot;1097610166&quot;, &quot;1098080648&quot;, &quot;13810090&quot;, 
  &quot;63444976&quot;, &quot;1221464992&quot;, &quot;1097497475&quot;, &quot;91100475&quot;, &quot;1095312933&quot;, 
  &quot;28131889&quot;, &quot;63506738&quot;, &quot;7922341&quot;, &quot;28238547&quot;, &quot;27985819&quot;, &quot;27958501&quot;, 
  &quot;23912889&quot;, &quot;5707630&quot;, &quot;1102388693&quot;, &quot;24028654&quot;, &quot;28128637&quot;, 
  &quot;5554160&quot;, &quot;63369230&quot;, &quot;36521093&quot;, &quot;91525097&quot;, &quot;27929902&quot;, &quot;63441041&quot;, 
  &quot;1097919703&quot;, &quot;40984557&quot;, &quot;1097129811&quot;, &quot;13843871&quot;, &quot;63301433&quot;, 
  &quot;28236969&quot;, &quot;37831774&quot;, &quot;1000942168&quot;, &quot;1005220322&quot;, &quot;1098661759&quot;, 
  &quot;1095843775&quot;, &quot;28399609&quot;, &quot;37211106&quot;, &quot;5683927&quot;, &quot;28254346&quot;, 
  &quot;91268076&quot;, &quot;28295325&quot;, &quot;28496274&quot;, &quot;13820294&quot;, &quot;28354968&quot;, &quot;37793321&quot;, 
  &quot;63495244&quot;, &quot;63299126&quot;, &quot;13849979&quot;, &quot;63357743&quot;, &quot;60262321&quot;, &quot;1098753025&quot;, 
  &quot;91435400&quot;, &quot;2195064&quot;, &quot;63345546&quot;, &quot;63251135&quot;, &quot;13827671&quot;, &quot;2007126&quot;, 
  &quot;40378506&quot;, &quot;1097121371&quot;, &quot;37828831&quot;, &quot;5707059&quot;, &quot;63324477&quot;, 
  &quot;1102644458&quot;, &quot;37796841&quot;, &quot;28334234&quot;, &quot;28010824&quot;, &quot;28495363&quot;, 
  &quot;27929493&quot;, &quot;5558783&quot;, &quot;51974763&quot;, &quot;28296333&quot;, &quot;63489129&quot;, &quot;1102385538&quot;, 
  &quot;13814150&quot;, &quot;13829893&quot;, &quot;28377189&quot;, &quot;91342964&quot;, &quot;164497637&quot;, 
  &quot;52326169&quot;, &quot;63286143&quot;, &quot;1099738639&quot;, &quot;63503298&quot;, &quot;1097913686&quot;, 
  &quot;91070753&quot;, &quot;37652636&quot;, &quot;60352132&quot;), Value= c(42084408, 
  21879648, 21321888, 17393328, 15215002, 9926442, 8971332, 5388376, 
  5114854, 5093730, 5004621, 3696756, 3424872, 3347432, 3337895, 
  3105759, 3104409, 3056238, 2748870, 2738808, 2662730, 2555784, 
  2268480, 2126700, 2051811, 2035200, 2025495, 1962000, 1926012, 
  1829736, 1822980, 1657659, 1574901, 1546320, 1539355, 1480530, 
  1456140, 1372302, 1372302, 1367235, 1350330, 1330560, 1327761, 
  1289520, 1265556, 1258350, 1245060, 1228770, 1228545, 1209705, 
  1196100, 1180533, 1175274, 1170286, 1144792, 1106820, 1106820, 
  1080621, 1080621, 1080621, 1080621, 1080621, 1080621, 1080621, 
  1080621, 1080264, 1067400, 1067400, 1003000, 993510, 992520, 
  988560, 957408, 957408, 922350, 889893, 888300, 883800, 855150, 
  835920, 833481, 833481, 833481, 833481, 833481, 833481, 833481, 
  833481, 823458, 775300, 741420, 734760, 734760, 729882, 672660, 
  666740, 631020, 621000, 621000, 600651, 598050, 553410, 553410, 
  553410, 553410, 553410, 553410, 553410, 552690, 503340, 468120, 
  439800, 416040, 415136, 403235, 398700, 383629, 383629, 383629, 
  367380, 364941, 360207, 360088, 346680, 339582, 339201, 339201, 
  339201, 339201, 303120, 300450, 289080, 282042, 238080, 234060, 
  219531, 211300, 195447, 195447, 192960, 192960, 169000, 169000, 
  169000, 163868, 163868, 156540, 143460, 136080, 132048, 127818, 
  127818, 124920, 124920, 124920, 124920, 105120, 93690, 93690, 
  77580, 66024, 64650, 62460, 62460, 62376, 58800, 58338, 57240, 
  50524, 49260, 49260, 48240, 46528, 44100, 43110, 42930, 41640, 
  40755, 38715, 37050, 35685, 33012, 30687, 28620, 28620, 24678, 
  24570, 15189, 15120, 15120, 14504, 14310, 11424, 6000, 5940, 
  5428)), row.names = c(NA, -196L), class = c(&quot;tbl_df&quot;, &quot;tbl&quot;, 
  &quot;data.frame&quot;))
  </code></pre>