Skip to content

Instantly share code, notes, and snippets.

@Maschette

Maschette/costs.r

Created November 15, 2019 00:10
Show Gist options
  • Save Maschette/7c10a0f32c6b0554a5e87bff3f66b5be to your computer and use it in GitHub Desktop.
Save Maschette/7c10a0f32c6b0554a5e87bff3f66b5be to your computer and use it in GitHub Desktop.
Download ZIP
Raw
costs.r
Gist for comments on the arc and Traz costs.
@Maschette
Copy link
Author

#Arc

library(dplyr)
library(tidyr)

cost_80 <- cost_80 %>% mutate(top_1 = Cost - (X1st),
                                                            top_2 = Cost - (X1st + X2nd),
                                                            top_3 = Cost - (X1st + X2nd + X3rd),
                                                            top_4 = Cost - (X1st + X2nd + X3rd + X4th),
                                                            top_5 = Cost - (X1st + X2nd + X3rd + X4th + X5th))


cost_plot<- cost_80 %>% select(Level, top_1, top_2, top_3, top_4, top_5) %>% gather(contributors, remaining, -Level)


library(ggplot2)
ggplot(data = cost_plot, aes(Level, remaining, col = contributors ))+
    geom_line(size=1)+
    labs(x="Alcatraz Level", y="Remaining points to contribute")+
    scale_color_manual(values=c(1,2,4, 5, 6), name = "Positions \n with level 80", labels=c("Top 1","Top 2","Top 3","Top 4","Top 5"))

ggplot(data = filter(cost_plot, contributors %in% c("top_3","top_4","top_5")), aes(Level, remaining, col = contributors ))+
    geom_line(size=1)+
    labs(x="Alcatraz Level", y="Remaining points to contribute")+
    scale_color_manual(values=c(4, 5, 6), name = "Positions \n with level 80", labels=c("Top 3","Top 4","Top 5"))

knitr::kable(cost_80, caption = "Cost and boost of Arc per level with rewards by position for people with level 80 arcs. Top 3/4/5 is the number of points remaining to get to next level based on the number of positions taken by people with level 80 Arcs.", col.names = c("Level", "Cost", "% Boost", "1st", "2nd", "3rd", "4th", "5th", "Top 1", "Top 2","Top 3", "Top 4", "Top 5"))
Cost and boost of Arc per level with rewards by position for people with level 80 arcs. Top 3/4/5 is the number of points remaining to get to next level based on the number of positions taken by people with level 80 Arcs.
Level Cost % Boost 1st 2nd 3rd 4th 5th Top 1 Top 2 Top 3 Top 4 Top 5
1 70 10.0 19 10 0 0 0 51 41 41 41 41
2 110 12.0 29 19 10 0 0 81 62 52 52 52
3 200 14.0 48 29 10 0 0 152 123 113 113 113
4 290 17.0 67 38 10 0 0 223 185 175 175 175
5 400 19.0 86 48 19 10 0 314 266 247 237 237
6 510 22.0 114 57 19 10 0 396 339 320 310 310
7 620 24.0 133 67 19 10 0 487 420 401 391 391
8 740 26.0 162 86 29 10 0 578 492 463 453 453
9 860 29.0 181 95 29 10 0 679 584 555 545 545
10 970 31.0 209 105 38 10 0 761 656 618 608 608
11 995 32.0 228 114 38 10 0 767 653 615 605 605
12 1020 33.0 257 133 48 10 0 763 630 582 572 572
13 1045 34.0 285 143 48 10 0 760 617 569 559 559
14 1071 35.0 314 162 57 19 0 757 595 538 519 519
15 1098 36.0 342 171 57 19 0 756 585 528 509 509
16 1125 37.0 371 190 67 19 0 754 564 497 478 478
17 1154 38.0 399 200 67 19 0 755 555 488 469 469
18 1182 39.0 428 219 76 19 0 754 535 459 440 440
19 1212 40.0 456 228 76 19 0 756 528 452 433 433
20 1242 41.0 485 247 86 19 0 757 510 424 405 405
21 1273 42.0 513 257 86 19 0 760 503 417 398 398
22 1305 43.0 551 276 95 29 10 754 478 383 354 344
23 1338 44.0 580 295 95 29 10 758 463 368 339 329
24 1371 45.0 608 304 105 29 10 763 459 354 325 315
25 1405 46.0 637 323 105 29 10 768 445 340 311 301
26 1440 47.0 675 342 114 29 10 765 423 309 280 270
27 1476 48.0 703 352 114 29 10 773 421 307 278 268
28 1513 49.0 732 371 124 29 10 781 410 286 257 247
29 1551 50.0 770 390 133 38 10 781 391 258 220 210
30 1590 51.0 798 399 133 38 10 792 393 260 222 212
31 1630 52.0 827 418 143 38 10 803 385 242 204 194
32 1670 53.0 865 437 143 38 10 805 368 225 187 177
33 1712 54.0 893 447 152 38 10 819 372 220 182 172
34 1755 55.0 931 466 152 38 10 824 358 206 168 158
35 1799 56.0 960 485 156 38 10 839 354 198 160 150
36 1844 57.0 998 504 171 48 10 846 342 171 123 113
37 1890 58.0 1026 513 171 48 10 864 351 180 132 122
38 1937 59.0 1064 532 181 48 10 873 341 160 112 102
39 1986 60.0 1093 551 181 48 10 893 342 161 113 103
40 2035 61.0 1131 570 190 48 10 904 334 144 96 86
41 2086 62.0 1169 589 200 48 10 917 328 128 80 70
42 2138 63.0 1197 599 200 48 10 941 342 142 94 84
43 2192 64.0 1235 618 209 57 10 957 339 130 73 63
44 2246 65.0 1273 637 209 57 10 973 336 127 70 60
45 2303 66.0 1302 656 219 57 10 1001 345 126 69 59
46 2360 67.0 1340 675 228 57 10 1020 345 117 60 50
47 2419 68.0 1378 694 228 57 10 1041 347 119 62 52
48 2480 69.0 1406 703 238 57 10 1074 371 133 76 66
49 2541 70.0 1444 722 238 57 10 1097 375 137 80 70
50 2605 71.0 1482 741 247 67 10 1123 382 135 68 58
51 2670 72.0 1520 760 257 67 10 1150 390 133 66 56
52 2737 73.0 1549 779 257 67 10 1188 409 152 85 75
53 2805 74.0 1587 798 266 67 10 1218 420 154 87 77
54 2875 75.0 1625 817 276 67 10 1250 433 157 90 80
55 2947 76.0 1663 836 276 67 10 1284 448 172 105 95
56 3021 77.0 1701 855 285 76 19 1320 465 180 104 85
57 3096 78.0 1739 874 295 76 19 1357 483 188 112 93
58 3174 79.0 1767 884 295 76 19 1407 523 228 152 133
59 3253 79.5 1805 903 304 76 19 1448 545 241 165 146
60 3334 80.0 1843 922 304 76 19 1491 569 265 189 170
61 3418 80.5 1881 941 314 76 19 1537 596 282 206 187
62 3503 81.0 1919 960 323 86 19 1584 624 301 215 196
63 3591 81.5 1957 979 323 86 19 1634 655 332 246 227
64 3681 82.0 1995 998 333 86 19 1686 688 355 269 250
65 3773 82.5 2033 1017 342 86 19 1740 723 381 295 276
66 3867 83.0 2071 1036 342 86 19 1796 760 418 332 313
67 3964 83.5 2109 1055 352 86 19 1855 800 448 362 343
68 4063 84.0 2147 1074 361 95 19 1916 842 481 386 367
69 4164 84.5 2185 1093 361 95 19 1979 886 525 430 411
70 4268 85.0 2223 1112 371 95 19 2045 933 562 467 448
71 4375 85.5 2261 1131 380 95 19 2114 983 603 508 489
72 4484 86.0 2299 1150 380 95 19 2185 1035 655 560 541
73 4596 86.5 2337 1169 390 95 19 2259 1090 700 605 586
74 4711 87.0 2375 1188 399 105 19 2336 1148 749 644 625
75 4829 87.5 2413 1207 399 105 19 2416 1209 810 705 686
76 4950 88.0 2451 1226 409 105 19 2499 1273 864 759 740
77 5074 88.5 2489 1245 418 105 19 2585 1340 922 817 798
78 5200 89.0 2537 1273 428 105 19 2663 1390 962 857 838
79 5330 89.5 2575 1292 428 105 19 2755 1463 1035 930 911
80 5464 90.0 2613 1311 437 114 19 2851 1540 1103 989 970

#Alcatraz

cost_80 <-cost

library(dplyr)
library(tidyr)

cost_80 <- cost_80 %>% mutate(top_1 = Cost - (X1st),
                                                            top_2 = Cost - (X1st + X2nd),
                                                            top_3 = Cost - (X1st + X2nd + X3rd),
                                                            top_4 = Cost - (X1st + X2nd + X3rd + X4th),
                                                            top_5 = Cost - (X1st + X2nd + X3rd + X4th + X5th))


cost_plot<- cost_80 %>% select(Level, top_1, top_2, top_3, top_4, top_5) %>% gather(contributors, remaining, -Level)

library(ggplot2)
ggplot(data = cost_plot, aes(Level, remaining, col = contributors ))+
    geom_line(size=1)+
    labs(x="Alcatraz Level", y="Remaining points to contribute")+
    scale_color_manual(values=c(1,2,4, 5, 6), name = "Positions \n with level 80", labels=c("Top 1","Top 2","Top 3","Top 4","Top 5"))

ggplot(data = filter(cost_plot, contributors %in% c("top_3","top_4","top_5")), aes(Level, remaining, col = contributors ))+
    geom_line(size=1)+
    labs(x="Alcatraz Level", y="Remaining points to contribute")+
    scale_color_manual(values=c(4, 5, 6), name = "Positions \n with level 80", labels=c("Top 3","Top 4","Top 5"))

knitr::kable(cost_80, caption = "Cost and boost of Alcatraz per level with rewards by position for people with level 80 arcs. Top 3/4/5 is the number of points remaining to get to next level based on the number of positions taken by people with level 80 Arcs.", col.names = c("Level", "Cost", "Happiness","Troops", "1st", "2nd", "3rd", "4th", "5th","Top 1", "Top 2", "Top 3", "Top 4", "Top 5"))
Cost and boost of Alcatraz per level with rewards by position for people with level 80 arcs. Top 3/4/5 is the number of points remaining to get to next level based on the number of positions taken by people with level 80 Arcs.
Level Cost Happiness Troops 1st 2nd 3rd 4th 5th Top 1 Top 2 Top 3 Top 4 Top 5
1 60 2700 8 19 10 0 0 0 41 31 31 31 31
2 90 3100 8 19 10 0 0 0 71 61 61 61 61
3 170 3750 10 38 19 10 0 0 132 113 103 103 103
4 260 4550 10 57 29 10 0 0 203 174 164 164 164
5 340 5470 10 67 38 10 0 0 273 235 225 225 225
6 440 6480 12 86 48 19 10 0 354 306 287 277 277
7 530 7580 12 105 57 19 10 0 425 368 349 339 339
8 630 8750 12 124 67 19 10 0 506 439 420 410 410
9 740 10000 14 143 76 29 10 0 597 521 492 482 482
10 830 11300 16 162 86 29 10 0 668 582 553 543 543
11 851 11852 18 181 95 29 10 0 670 575 546 536 536
12 873 12379 19 200 105 38 10 0 673 568 530 520 520
13 894 12884 21 228 114 38 10 0 666 552 514 504 504
14 917 13371 23 247 124 38 10 0 670 546 508 498 498
15 940 13840 25 266 133 48 10 0 674 541 493 483 483
16 963 14294 27 295 152 48 10 0 668 516 468 458 458
17 987 14734 29 314 162 57 19 0 673 511 454 435 435
18 1012 15161 31 333 171 57 19 0 679 508 451 432 432
19 1037 15576 33 361 181 57 19 0 676 495 438 419 419
20 1063 15981 35 380 190 67 19 0 683 493 426 407 407
21 1090 16376 37 409 209 67 19 0 681 472 405 386 386
22 1117 16761 38 428 219 76 19 5 689 470 394 375 370
23 1145 17138 40 456 228 76 19 5 689 461 385 366 361
24 1173 17506 42 475 238 76 19 5 698 460 384 365 360
25 1203 17867 44 504 257 86 19 5 699 442 356 337 332
26 1233 18221 46 523 266 86 19 5 710 444 358 339 334
27 1263 18568 48 551 276 95 29 5 712 436 341 312 307
28 1295 18909 50 570 285 95 29 5 725 440 345 316 311
29 1327 19244 52 599 304 105 29 5 728 424 319 290 285
30 1361 19573 54 627 314 105 29 5 734 420 315 286 281
31 1395 19896 56 646 323 105 29 5 749 426 321 292 287
32 1429 20215 57 675 342 114 29 5 754 412 298 269 264
33 1465 20528 59 703 352 114 29 5 762 410 296 267 262
34 1502 20837 61 732 371 124 29 5 770 399 275 246 241
35 1539 21141 63 751 380 124 29 5 788 408 284 255 250
36 1578 21441 65 779 390 133 38 5 799 409 276 238 233
37 1617 21736 67 808 409 133 38 5 809 400 267 229 224
38 1658 22028 69 836 418 143 38 5 822 404 261 223 218
39 1699 22316 71 855 428 143 38 5 844 416 273 235 230
40 1741 22600 73 884 447 152 38 5 857 410 258 220 215
41 1785 22881 75 912 456 152 38 5 873 417 265 227 222
42 1830 23159 76 941 475 162 38 5 889 414 252 214 209
43 1875 23433 78 969 485 162 38 5 906 421 259 221 216
44 1922 23704 80 998 504 171 48 5 924 420 249 201 196
45 1970 23971 82 1017 513 171 48 5 953 440 269 221 216
46 2020 24236 84 1045 523 173 48 5 975 452 279 231 226
47 2070 24498 86 1074 542 181 48 5 996 454 273 225 220
48 2122 24758 88 1102 551 181 48 5 1020 469 288 240 235
49 2175 25014 90 1131 570 190 48 5 1044 474 284 236 231
50 2229 25268 92 1159 580 190 48 5 1070 490 300 252 247
51 2285 25519 94 1188 599 200 48 5 1097 498 298 250 245
52 2342 25768 95 1216 608 200 48 5 1126 518 318 270 265
53 2400 26015 97 1245 627 209 57 5 1155 528 319 262 257
54 2460 26259 99 1273 637 209 57 5 1187 550 341 284 279
55 2522 26501 101 1302 656 219 57 5 1220 564 345 288 283
56 2585 26741 103 1330 665 219 57 5 1255 590 371 314 309
57 2650 26979 105 1359 684 228 57 5 1291 607 379 322 317
58 2716 27215 107 1387 694 228 57 5 1329 635 407 350 345
59 2784 27448 109 1416 713 238 57 5 1368 655 417 360 355
60 2853 27680 111 1444 722 238 57 5 1409 687 449 392 387
61 2925 27909 113 1473 741 247 67 5 1452 711 464 397 392
62 2998 28137 114 1501 751 247 67 5 1497 746 499 432 427
63 3073 28363 116 1530 770 257 67 5 1543 773 516 449 444
64 3149 28587 118 1558 779 257 67 5 1591 812 555 488 483
65 3228 28810 120 1587 798 266 67 5 1641 843 577 510 505
66 3309 29031 122 1625 817 276 67 5 1684 867 591 524 519
67 3392 29250 124 1653 827 276 67 5 1739 912 636 569 564
68 3476 29467 126 1682 846 285 76 10 1794 948 663 587 577
69 3563 29683 128 1710 855 285 76 10 1853 998 713 637 627
70 3652 29897 130 1739 874 295 76 10 1913 1039 744 668 658
71 3744 30110 132 1767 884 295 76 10 1977 1093 798 722 712
72 3837 30322 133 1796 903 304 76 10 2041 1138 834 758 748
73 3933 30531 135 1834 922 304 76 10 2099 1177 873 797 787
74 4031 30740 137 1862 931 314 76 10 2169 1238 924 848 838
75 4132 30947 139 1891 950 314 76 10 2241 1291 977 901 891
76 4235 31152 141 1919 960 323 86 10 2316 1356 1033 947 937
77 4341 31357 143 1948 979 323 86 10 2393 1414 1091 1005 995
78 4450 31560 145 1986 998 333 86 10 2464 1466 1133 1047 1037
79 4561 31761 147 2014 1007 333 86 10 2547 1540 1207 1121 1111
80 4675 31962 149 2043 1026 342 86 10 2632 1606 1264 1178 1168
81 4792 32161 151 2071 1036 342 86 10 2721 1685 1343 1257 1247
82 4912 32359 152 2109 1055 352 86 10 2803 1748 1396 1310 1300

Created on 2019-11-15 by the reprex package (v0.3.0)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment