# Run lib dplyr
library(dplyr)
## Warning: package 'dplyr' was built under R version 4.4.2
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
# Memuat dataset ChickWeight
data("ChickWeight")

# Menampilkan 6 baris pertama dataset
head(ChickWeight)
##   weight Time Chick Diet
## 1     42    0     1    1
## 2     51    2     1    1
## 3     59    4     1    1
## 4     64    6     1    1
## 5     76    8     1    1
## 6     93   10     1    1
# Memilih Chick dan weight saja
data_terpilih <- ChickWeight %>%
  select(Chick, weight)

print(data_terpilih)
##     Chick weight
## 1       1     42
## 2       1     51
## 3       1     59
## 4       1     64
## 5       1     76
## 6       1     93
## 7       1    106
## 8       1    125
## 9       1    149
## 10      1    171
## 11      1    199
## 12      1    205
## 13      2     40
## 14      2     49
## 15      2     58
## 16      2     72
## 17      2     84
## 18      2    103
## 19      2    122
## 20      2    138
## 21      2    162
## 22      2    187
## 23      2    209
## 24      2    215
## 25      3     43
## 26      3     39
## 27      3     55
## 28      3     67
## 29      3     84
## 30      3     99
## 31      3    115
## 32      3    138
## 33      3    163
## 34      3    187
## 35      3    198
## 36      3    202
## 37      4     42
## 38      4     49
## 39      4     56
## 40      4     67
## 41      4     74
## 42      4     87
## 43      4    102
## 44      4    108
## 45      4    136
## 46      4    154
## 47      4    160
## 48      4    157
## 49      5     41
## 50      5     42
## 51      5     48
## 52      5     60
## 53      5     79
## 54      5    106
## 55      5    141
## 56      5    164
## 57      5    197
## 58      5    199
## 59      5    220
## 60      5    223
## 61      6     41
## 62      6     49
## 63      6     59
## 64      6     74
## 65      6     97
## 66      6    124
## 67      6    141
## 68      6    148
## 69      6    155
## 70      6    160
## 71      6    160
## 72      6    157
## 73      7     41
## 74      7     49
## 75      7     57
## 76      7     71
## 77      7     89
## 78      7    112
## 79      7    146
## 80      7    174
## 81      7    218
## 82      7    250
## 83      7    288
## 84      7    305
## 85      8     42
## 86      8     50
## 87      8     61
## 88      8     71
## 89      8     84
## 90      8     93
## 91      8    110
## 92      8    116
## 93      8    126
## 94      8    134
## 95      8    125
## 96      9     42
## 97      9     51
## 98      9     59
## 99      9     68
## 100     9     85
## 101     9     96
## 102     9     90
## 103     9     92
## 104     9     93
## 105     9    100
## 106     9    100
## 107     9     98
## 108    10     41
## 109    10     44
## 110    10     52
## 111    10     63
## 112    10     74
## 113    10     81
## 114    10     89
## 115    10     96
## 116    10    101
## 117    10    112
## 118    10    120
## 119    10    124
## 120    11     43
## 121    11     51
## 122    11     63
## 123    11     84
## 124    11    112
## 125    11    139
## 126    11    168
## 127    11    177
## 128    11    182
## 129    11    184
## 130    11    181
## 131    11    175
## 132    12     41
## 133    12     49
## 134    12     56
## 135    12     62
## 136    12     72
## 137    12     88
## 138    12    119
## 139    12    135
## 140    12    162
## 141    12    185
## 142    12    195
## 143    12    205
## 144    13     41
## 145    13     48
## 146    13     53
## 147    13     60
## 148    13     65
## 149    13     67
## 150    13     71
## 151    13     70
## 152    13     71
## 153    13     81
## 154    13     91
## 155    13     96
## 156    14     41
## 157    14     49
## 158    14     62
## 159    14     79
## 160    14    101
## 161    14    128
## 162    14    164
## 163    14    192
## 164    14    227
## 165    14    248
## 166    14    259
## 167    14    266
## 168    15     41
## 169    15     49
## 170    15     56
## 171    15     64
## 172    15     68
## 173    15     68
## 174    15     67
## 175    15     68
## 176    16     41
## 177    16     45
## 178    16     49
## 179    16     51
## 180    16     57
## 181    16     51
## 182    16     54
## 183    17     42
## 184    17     51
## 185    17     61
## 186    17     72
## 187    17     83
## 188    17     89
## 189    17     98
## 190    17    103
## 191    17    113
## 192    17    123
## 193    17    133
## 194    17    142
## 195    18     39
## 196    18     35
## 197    19     43
## 198    19     48
## 199    19     55
## 200    19     62
## 201    19     65
## 202    19     71
## 203    19     82
## 204    19     88
## 205    19    106
## 206    19    120
## 207    19    144
## 208    19    157
## 209    20     41
## 210    20     47
## 211    20     54
## 212    20     58
## 213    20     65
## 214    20     73
## 215    20     77
## 216    20     89
## 217    20     98
## 218    20    107
## 219    20    115
## 220    20    117
## 221    21     40
## 222    21     50
## 223    21     62
## 224    21     86
## 225    21    125
## 226    21    163
## 227    21    217
## 228    21    240
## 229    21    275
## 230    21    307
## 231    21    318
## 232    21    331
## 233    22     41
## 234    22     55
## 235    22     64
## 236    22     77
## 237    22     90
## 238    22     95
## 239    22    108
## 240    22    111
## 241    22    131
## 242    22    148
## 243    22    164
## 244    22    167
## 245    23     43
## 246    23     52
## 247    23     61
## 248    23     73
## 249    23     90
## 250    23    103
## 251    23    127
## 252    23    135
## 253    23    145
## 254    23    163
## 255    23    170
## 256    23    175
## 257    24     42
## 258    24     52
## 259    24     58
## 260    24     74
## 261    24     66
## 262    24     68
## 263    24     70
## 264    24     71
## 265    24     72
## 266    24     72
## 267    24     76
## 268    24     74
## 269    25     40
## 270    25     49
## 271    25     62
## 272    25     78
## 273    25    102
## 274    25    124
## 275    25    146
## 276    25    164
## 277    25    197
## 278    25    231
## 279    25    259
## 280    25    265
## 281    26     42
## 282    26     48
## 283    26     57
## 284    26     74
## 285    26     93
## 286    26    114
## 287    26    136
## 288    26    147
## 289    26    169
## 290    26    205
## 291    26    236
## 292    26    251
## 293    27     39
## 294    27     46
## 295    27     58
## 296    27     73
## 297    27     87
## 298    27    100
## 299    27    115
## 300    27    123
## 301    27    144
## 302    27    163
## 303    27    185
## 304    27    192
## 305    28     39
## 306    28     46
## 307    28     58
## 308    28     73
## 309    28     92
## 310    28    114
## 311    28    145
## 312    28    156
## 313    28    184
## 314    28    207
## 315    28    212
## 316    28    233
## 317    29     39
## 318    29     48
## 319    29     59
## 320    29     74
## 321    29     87
## 322    29    106
## 323    29    134
## 324    29    150
## 325    29    187
## 326    29    230
## 327    29    279
## 328    29    309
## 329    30     42
## 330    30     48
## 331    30     59
## 332    30     72
## 333    30     85
## 334    30     98
## 335    30    115
## 336    30    122
## 337    30    143
## 338    30    151
## 339    30    157
## 340    30    150
## 341    31     42
## 342    31     53
## 343    31     62
## 344    31     73
## 345    31     85
## 346    31    102
## 347    31    123
## 348    31    138
## 349    31    170
## 350    31    204
## 351    31    235
## 352    31    256
## 353    32     41
## 354    32     49
## 355    32     65
## 356    32     82
## 357    32    107
## 358    32    129
## 359    32    159
## 360    32    179
## 361    32    221
## 362    32    263
## 363    32    291
## 364    32    305
## 365    33     39
## 366    33     50
## 367    33     63
## 368    33     77
## 369    33     96
## 370    33    111
## 371    33    137
## 372    33    144
## 373    33    151
## 374    33    146
## 375    33    156
## 376    33    147
## 377    34     41
## 378    34     49
## 379    34     63
## 380    34     85
## 381    34    107
## 382    34    134
## 383    34    164
## 384    34    186
## 385    34    235
## 386    34    294
## 387    34    327
## 388    34    341
## 389    35     41
## 390    35     53
## 391    35     64
## 392    35     87
## 393    35    123
## 394    35    158
## 395    35    201
## 396    35    238
## 397    35    287
## 398    35    332
## 399    35    361
## 400    35    373
## 401    36     39
## 402    36     48
## 403    36     61
## 404    36     76
## 405    36     98
## 406    36    116
## 407    36    145
## 408    36    166
## 409    36    198
## 410    36    227
## 411    36    225
## 412    36    220
## 413    37     41
## 414    37     48
## 415    37     56
## 416    37     68
## 417    37     80
## 418    37     83
## 419    37    103
## 420    37    112
## 421    37    135
## 422    37    157
## 423    37    169
## 424    37    178
## 425    38     41
## 426    38     49
## 427    38     61
## 428    38     74
## 429    38     98
## 430    38    109
## 431    38    128
## 432    38    154
## 433    38    192
## 434    38    232
## 435    38    280
## 436    38    290
## 437    39     42
## 438    39     50
## 439    39     61
## 440    39     78
## 441    39     89
## 442    39    109
## 443    39    130
## 444    39    146
## 445    39    170
## 446    39    214
## 447    39    250
## 448    39    272
## 449    40     41
## 450    40     55
## 451    40     66
## 452    40     79
## 453    40    101
## 454    40    120
## 455    40    154
## 456    40    182
## 457    40    215
## 458    40    262
## 459    40    295
## 460    40    321
## 461    41     42
## 462    41     51
## 463    41     66
## 464    41     85
## 465    41    103
## 466    41    124
## 467    41    155
## 468    41    153
## 469    41    175
## 470    41    184
## 471    41    199
## 472    41    204
## 473    42     42
## 474    42     49
## 475    42     63
## 476    42     84
## 477    42    103
## 478    42    126
## 479    42    160
## 480    42    174
## 481    42    204
## 482    42    234
## 483    42    269
## 484    42    281
## 485    43     42
## 486    43     55
## 487    43     69
## 488    43     96
## 489    43    131
## 490    43    157
## 491    43    184
## 492    43    188
## 493    43    197
## 494    43    198
## 495    43    199
## 496    43    200
## 497    44     42
## 498    44     51
## 499    44     65
## 500    44     86
## 501    44    103
## 502    44    118
## 503    44    127
## 504    44    138
## 505    44    145
## 506    44    146
## 507    45     41
## 508    45     50
## 509    45     61
## 510    45     78
## 511    45     98
## 512    45    117
## 513    45    135
## 514    45    141
## 515    45    147
## 516    45    174
## 517    45    197
## 518    45    196
## 519    46     40
## 520    46     52
## 521    46     62
## 522    46     82
## 523    46    101
## 524    46    120
## 525    46    144
## 526    46    156
## 527    46    173
## 528    46    210
## 529    46    231
## 530    46    238
## 531    47     41
## 532    47     53
## 533    47     66
## 534    47     79
## 535    47    100
## 536    47    123
## 537    47    148
## 538    47    157
## 539    47    168
## 540    47    185
## 541    47    210
## 542    47    205
## 543    48     39
## 544    48     50
## 545    48     62
## 546    48     80
## 547    48    104
## 548    48    125
## 549    48    154
## 550    48    170
## 551    48    222
## 552    48    261
## 553    48    303
## 554    48    322
## 555    49     40
## 556    49     53
## 557    49     64
## 558    49     85
## 559    49    108
## 560    49    128
## 561    49    152
## 562    49    166
## 563    49    184
## 564    49    203
## 565    49    233
## 566    49    237
## 567    50     41
## 568    50     54
## 569    50     67
## 570    50     84
## 571    50    105
## 572    50    122
## 573    50    155
## 574    50    175
## 575    50    205
## 576    50    234
## 577    50    264
## 578    50    264
# Menampilkan summary dari dataset
ChickWeight_summary <- ChickWeight %>%
  summarise(average_time = mean(Time), 
            average_weight = mean(weight))
print(ChickWeight_summary)  # Menampilkan hasil summary
##   average_time average_weight
## 1     10.71799       121.8183
# Menyaring data dengan kondisi tertentu menggunakan filter()
ChickWeight_filtered <- ChickWeight %>%
  filter(weight < 150)
print(ChickWeight_filtered)  # Menampilkan hasil filter
##     weight Time Chick Diet
## 1       42    0     1    1
## 2       51    2     1    1
## 3       59    4     1    1
## 4       64    6     1    1
## 5       76    8     1    1
## 6       93   10     1    1
## 7      106   12     1    1
## 8      125   14     1    1
## 9      149   16     1    1
## 10      40    0     2    1
## 11      49    2     2    1
## 12      58    4     2    1
## 13      72    6     2    1
## 14      84    8     2    1
## 15     103   10     2    1
## 16     122   12     2    1
## 17     138   14     2    1
## 18      43    0     3    1
## 19      39    2     3    1
## 20      55    4     3    1
## 21      67    6     3    1
## 22      84    8     3    1
## 23      99   10     3    1
## 24     115   12     3    1
## 25     138   14     3    1
## 26      42    0     4    1
## 27      49    2     4    1
## 28      56    4     4    1
## 29      67    6     4    1
## 30      74    8     4    1
## 31      87   10     4    1
## 32     102   12     4    1
## 33     108   14     4    1
## 34     136   16     4    1
## 35      41    0     5    1
## 36      42    2     5    1
## 37      48    4     5    1
## 38      60    6     5    1
## 39      79    8     5    1
## 40     106   10     5    1
## 41     141   12     5    1
## 42      41    0     6    1
## 43      49    2     6    1
## 44      59    4     6    1
## 45      74    6     6    1
## 46      97    8     6    1
## 47     124   10     6    1
## 48     141   12     6    1
## 49     148   14     6    1
## 50      41    0     7    1
## 51      49    2     7    1
## 52      57    4     7    1
## 53      71    6     7    1
## 54      89    8     7    1
## 55     112   10     7    1
## 56     146   12     7    1
## 57      42    0     8    1
## 58      50    2     8    1
## 59      61    4     8    1
## 60      71    6     8    1
## 61      84    8     8    1
## 62      93   10     8    1
## 63     110   12     8    1
## 64     116   14     8    1
## 65     126   16     8    1
## 66     134   18     8    1
## 67     125   20     8    1
## 68      42    0     9    1
## 69      51    2     9    1
## 70      59    4     9    1
## 71      68    6     9    1
## 72      85    8     9    1
## 73      96   10     9    1
## 74      90   12     9    1
## 75      92   14     9    1
## 76      93   16     9    1
## 77     100   18     9    1
## 78     100   20     9    1
## 79      98   21     9    1
## 80      41    0    10    1
## 81      44    2    10    1
## 82      52    4    10    1
## 83      63    6    10    1
## 84      74    8    10    1
## 85      81   10    10    1
## 86      89   12    10    1
## 87      96   14    10    1
## 88     101   16    10    1
## 89     112   18    10    1
## 90     120   20    10    1
## 91     124   21    10    1
## 92      43    0    11    1
## 93      51    2    11    1
## 94      63    4    11    1
## 95      84    6    11    1
## 96     112    8    11    1
## 97     139   10    11    1
## 98      41    0    12    1
## 99      49    2    12    1
## 100     56    4    12    1
## 101     62    6    12    1
## 102     72    8    12    1
## 103     88   10    12    1
## 104    119   12    12    1
## 105    135   14    12    1
## 106     41    0    13    1
## 107     48    2    13    1
## 108     53    4    13    1
## 109     60    6    13    1
## 110     65    8    13    1
## 111     67   10    13    1
## 112     71   12    13    1
## 113     70   14    13    1
## 114     71   16    13    1
## 115     81   18    13    1
## 116     91   20    13    1
## 117     96   21    13    1
## 118     41    0    14    1
## 119     49    2    14    1
## 120     62    4    14    1
## 121     79    6    14    1
## 122    101    8    14    1
## 123    128   10    14    1
## 124     41    0    15    1
## 125     49    2    15    1
## 126     56    4    15    1
## 127     64    6    15    1
## 128     68    8    15    1
## 129     68   10    15    1
## 130     67   12    15    1
## 131     68   14    15    1
## 132     41    0    16    1
## 133     45    2    16    1
## 134     49    4    16    1
## 135     51    6    16    1
## 136     57    8    16    1
## 137     51   10    16    1
## 138     54   12    16    1
## 139     42    0    17    1
## 140     51    2    17    1
## 141     61    4    17    1
## 142     72    6    17    1
## 143     83    8    17    1
## 144     89   10    17    1
## 145     98   12    17    1
## 146    103   14    17    1
## 147    113   16    17    1
## 148    123   18    17    1
## 149    133   20    17    1
## 150    142   21    17    1
## 151     39    0    18    1
## 152     35    2    18    1
## 153     43    0    19    1
## 154     48    2    19    1
## 155     55    4    19    1
## 156     62    6    19    1
## 157     65    8    19    1
## 158     71   10    19    1
## 159     82   12    19    1
## 160     88   14    19    1
## 161    106   16    19    1
## 162    120   18    19    1
## 163    144   20    19    1
## 164     41    0    20    1
## 165     47    2    20    1
## 166     54    4    20    1
## 167     58    6    20    1
## 168     65    8    20    1
## 169     73   10    20    1
## 170     77   12    20    1
## 171     89   14    20    1
## 172     98   16    20    1
## 173    107   18    20    1
## 174    115   20    20    1
## 175    117   21    20    1
## 176     40    0    21    2
## 177     50    2    21    2
## 178     62    4    21    2
## 179     86    6    21    2
## 180    125    8    21    2
## 181     41    0    22    2
## 182     55    2    22    2
## 183     64    4    22    2
## 184     77    6    22    2
## 185     90    8    22    2
## 186     95   10    22    2
## 187    108   12    22    2
## 188    111   14    22    2
## 189    131   16    22    2
## 190    148   18    22    2
## 191     43    0    23    2
## 192     52    2    23    2
## 193     61    4    23    2
## 194     73    6    23    2
## 195     90    8    23    2
## 196    103   10    23    2
## 197    127   12    23    2
## 198    135   14    23    2
## 199    145   16    23    2
## 200     42    0    24    2
## 201     52    2    24    2
## 202     58    4    24    2
## 203     74    6    24    2
## 204     66    8    24    2
## 205     68   10    24    2
## 206     70   12    24    2
## 207     71   14    24    2
## 208     72   16    24    2
## 209     72   18    24    2
## 210     76   20    24    2
## 211     74   21    24    2
## 212     40    0    25    2
## 213     49    2    25    2
## 214     62    4    25    2
## 215     78    6    25    2
## 216    102    8    25    2
## 217    124   10    25    2
## 218    146   12    25    2
## 219     42    0    26    2
## 220     48    2    26    2
## 221     57    4    26    2
## 222     74    6    26    2
## 223     93    8    26    2
## 224    114   10    26    2
## 225    136   12    26    2
## 226    147   14    26    2
## 227     39    0    27    2
## 228     46    2    27    2
## 229     58    4    27    2
## 230     73    6    27    2
## 231     87    8    27    2
## 232    100   10    27    2
## 233    115   12    27    2
## 234    123   14    27    2
## 235    144   16    27    2
## 236     39    0    28    2
## 237     46    2    28    2
## 238     58    4    28    2
## 239     73    6    28    2
## 240     92    8    28    2
## 241    114   10    28    2
## 242    145   12    28    2
## 243     39    0    29    2
## 244     48    2    29    2
## 245     59    4    29    2
## 246     74    6    29    2
## 247     87    8    29    2
## 248    106   10    29    2
## 249    134   12    29    2
## 250     42    0    30    2
## 251     48    2    30    2
## 252     59    4    30    2
## 253     72    6    30    2
## 254     85    8    30    2
## 255     98   10    30    2
## 256    115   12    30    2
## 257    122   14    30    2
## 258    143   16    30    2
## 259     42    0    31    3
## 260     53    2    31    3
## 261     62    4    31    3
## 262     73    6    31    3
## 263     85    8    31    3
## 264    102   10    31    3
## 265    123   12    31    3
## 266    138   14    31    3
## 267     41    0    32    3
## 268     49    2    32    3
## 269     65    4    32    3
## 270     82    6    32    3
## 271    107    8    32    3
## 272    129   10    32    3
## 273     39    0    33    3
## 274     50    2    33    3
## 275     63    4    33    3
## 276     77    6    33    3
## 277     96    8    33    3
## 278    111   10    33    3
## 279    137   12    33    3
## 280    144   14    33    3
## 281    146   18    33    3
## 282    147   21    33    3
## 283     41    0    34    3
## 284     49    2    34    3
## 285     63    4    34    3
## 286     85    6    34    3
## 287    107    8    34    3
## 288    134   10    34    3
## 289     41    0    35    3
## 290     53    2    35    3
## 291     64    4    35    3
## 292     87    6    35    3
## 293    123    8    35    3
## 294     39    0    36    3
## 295     48    2    36    3
## 296     61    4    36    3
## 297     76    6    36    3
## 298     98    8    36    3
## 299    116   10    36    3
## 300    145   12    36    3
## 301     41    0    37    3
## 302     48    2    37    3
## 303     56    4    37    3
## 304     68    6    37    3
## 305     80    8    37    3
## 306     83   10    37    3
## 307    103   12    37    3
## 308    112   14    37    3
## 309    135   16    37    3
## 310     41    0    38    3
## 311     49    2    38    3
## 312     61    4    38    3
## 313     74    6    38    3
## 314     98    8    38    3
## 315    109   10    38    3
## 316    128   12    38    3
## 317     42    0    39    3
## 318     50    2    39    3
## 319     61    4    39    3
## 320     78    6    39    3
## 321     89    8    39    3
## 322    109   10    39    3
## 323    130   12    39    3
## 324    146   14    39    3
## 325     41    0    40    3
## 326     55    2    40    3
## 327     66    4    40    3
## 328     79    6    40    3
## 329    101    8    40    3
## 330    120   10    40    3
## 331     42    0    41    4
## 332     51    2    41    4
## 333     66    4    41    4
## 334     85    6    41    4
## 335    103    8    41    4
## 336    124   10    41    4
## 337     42    0    42    4
## 338     49    2    42    4
## 339     63    4    42    4
## 340     84    6    42    4
## 341    103    8    42    4
## 342    126   10    42    4
## 343     42    0    43    4
## 344     55    2    43    4
## 345     69    4    43    4
## 346     96    6    43    4
## 347    131    8    43    4
## 348     42    0    44    4
## 349     51    2    44    4
## 350     65    4    44    4
## 351     86    6    44    4
## 352    103    8    44    4
## 353    118   10    44    4
## 354    127   12    44    4
## 355    138   14    44    4
## 356    145   16    44    4
## 357    146   18    44    4
## 358     41    0    45    4
## 359     50    2    45    4
## 360     61    4    45    4
## 361     78    6    45    4
## 362     98    8    45    4
## 363    117   10    45    4
## 364    135   12    45    4
## 365    141   14    45    4
## 366    147   16    45    4
## 367     40    0    46    4
## 368     52    2    46    4
## 369     62    4    46    4
## 370     82    6    46    4
## 371    101    8    46    4
## 372    120   10    46    4
## 373    144   12    46    4
## 374     41    0    47    4
## 375     53    2    47    4
## 376     66    4    47    4
## 377     79    6    47    4
## 378    100    8    47    4
## 379    123   10    47    4
## 380    148   12    47    4
## 381     39    0    48    4
## 382     50    2    48    4
## 383     62    4    48    4
## 384     80    6    48    4
## 385    104    8    48    4
## 386    125   10    48    4
## 387     40    0    49    4
## 388     53    2    49    4
## 389     64    4    49    4
## 390     85    6    49    4
## 391    108    8    49    4
## 392    128   10    49    4
## 393     41    0    50    4
## 394     54    2    50    4
## 395     67    4    50    4
## 396     84    6    50    4
## 397    105    8    50    4
## 398    122   10    50    4
# Mengurutkan data berdasarkan kolom Chick secara descending menggunakan arrange()
ChickWeight_sorted <- ChickWeight %>%
  arrange(desc(Chick))
print(ChickWeight_sorted)  # Menampilkan hasil sorting
##     weight Time Chick Diet
## 1       39    0    48    4
## 2       50    2    48    4
## 3       62    4    48    4
## 4       80    6    48    4
## 5      104    8    48    4
## 6      125   10    48    4
## 7      154   12    48    4
## 8      170   14    48    4
## 9      222   16    48    4
## 10     261   18    48    4
## 11     303   20    48    4
## 12     322   21    48    4
## 13      42    0    42    4
## 14      49    2    42    4
## 15      63    4    42    4
## 16      84    6    42    4
## 17     103    8    42    4
## 18     126   10    42    4
## 19     160   12    42    4
## 20     174   14    42    4
## 21     204   16    42    4
## 22     234   18    42    4
## 23     269   20    42    4
## 24     281   21    42    4
## 25      41    0    50    4
## 26      54    2    50    4
## 27      67    4    50    4
## 28      84    6    50    4
## 29     105    8    50    4
## 30     122   10    50    4
## 31     155   12    50    4
## 32     175   14    50    4
## 33     205   16    50    4
## 34     234   18    50    4
## 35     264   20    50    4
## 36     264   21    50    4
## 37      40    0    46    4
## 38      52    2    46    4
## 39      62    4    46    4
## 40      82    6    46    4
## 41     101    8    46    4
## 42     120   10    46    4
## 43     144   12    46    4
## 44     156   14    46    4
## 45     173   16    46    4
## 46     210   18    46    4
## 47     231   20    46    4
## 48     238   21    46    4
## 49      40    0    49    4
## 50      53    2    49    4
## 51      64    4    49    4
## 52      85    6    49    4
## 53     108    8    49    4
## 54     128   10    49    4
## 55     152   12    49    4
## 56     166   14    49    4
## 57     184   16    49    4
## 58     203   18    49    4
## 59     233   20    49    4
## 60     237   21    49    4
## 61      41    0    47    4
## 62      53    2    47    4
## 63      66    4    47    4
## 64      79    6    47    4
## 65     100    8    47    4
## 66     123   10    47    4
## 67     148   12    47    4
## 68     157   14    47    4
## 69     168   16    47    4
## 70     185   18    47    4
## 71     210   20    47    4
## 72     205   21    47    4
## 73      42    0    41    4
## 74      51    2    41    4
## 75      66    4    41    4
## 76      85    6    41    4
## 77     103    8    41    4
## 78     124   10    41    4
## 79     155   12    41    4
## 80     153   14    41    4
## 81     175   16    41    4
## 82     184   18    41    4
## 83     199   20    41    4
## 84     204   21    41    4
## 85      42    0    43    4
## 86      55    2    43    4
## 87      69    4    43    4
## 88      96    6    43    4
## 89     131    8    43    4
## 90     157   10    43    4
## 91     184   12    43    4
## 92     188   14    43    4
## 93     197   16    43    4
## 94     198   18    43    4
## 95     199   20    43    4
## 96     200   21    43    4
## 97      41    0    45    4
## 98      50    2    45    4
## 99      61    4    45    4
## 100     78    6    45    4
## 101     98    8    45    4
## 102    117   10    45    4
## 103    135   12    45    4
## 104    141   14    45    4
## 105    147   16    45    4
## 106    174   18    45    4
## 107    197   20    45    4
## 108    196   21    45    4
## 109     42    0    44    4
## 110     51    2    44    4
## 111     65    4    44    4
## 112     86    6    44    4
## 113    103    8    44    4
## 114    118   10    44    4
## 115    127   12    44    4
## 116    138   14    44    4
## 117    145   16    44    4
## 118    146   18    44    4
## 119     41    0    35    3
## 120     53    2    35    3
## 121     64    4    35    3
## 122     87    6    35    3
## 123    123    8    35    3
## 124    158   10    35    3
## 125    201   12    35    3
## 126    238   14    35    3
## 127    287   16    35    3
## 128    332   18    35    3
## 129    361   20    35    3
## 130    373   21    35    3
## 131     41    0    34    3
## 132     49    2    34    3
## 133     63    4    34    3
## 134     85    6    34    3
## 135    107    8    34    3
## 136    134   10    34    3
## 137    164   12    34    3
## 138    186   14    34    3
## 139    235   16    34    3
## 140    294   18    34    3
## 141    327   20    34    3
## 142    341   21    34    3
## 143     41    0    40    3
## 144     55    2    40    3
## 145     66    4    40    3
## 146     79    6    40    3
## 147    101    8    40    3
## 148    120   10    40    3
## 149    154   12    40    3
## 150    182   14    40    3
## 151    215   16    40    3
## 152    262   18    40    3
## 153    295   20    40    3
## 154    321   21    40    3
## 155     41    0    32    3
## 156     49    2    32    3
## 157     65    4    32    3
## 158     82    6    32    3
## 159    107    8    32    3
## 160    129   10    32    3
## 161    159   12    32    3
## 162    179   14    32    3
## 163    221   16    32    3
## 164    263   18    32    3
## 165    291   20    32    3
## 166    305   21    32    3
## 167     41    0    38    3
## 168     49    2    38    3
## 169     61    4    38    3
## 170     74    6    38    3
## 171     98    8    38    3
## 172    109   10    38    3
## 173    128   12    38    3
## 174    154   14    38    3
## 175    192   16    38    3
## 176    232   18    38    3
## 177    280   20    38    3
## 178    290   21    38    3
## 179     42    0    39    3
## 180     50    2    39    3
## 181     61    4    39    3
## 182     78    6    39    3
## 183     89    8    39    3
## 184    109   10    39    3
## 185    130   12    39    3
## 186    146   14    39    3
## 187    170   16    39    3
## 188    214   18    39    3
## 189    250   20    39    3
## 190    272   21    39    3
## 191     42    0    31    3
## 192     53    2    31    3
## 193     62    4    31    3
## 194     73    6    31    3
## 195     85    8    31    3
## 196    102   10    31    3
## 197    123   12    31    3
## 198    138   14    31    3
## 199    170   16    31    3
## 200    204   18    31    3
## 201    235   20    31    3
## 202    256   21    31    3
## 203     39    0    36    3
## 204     48    2    36    3
## 205     61    4    36    3
## 206     76    6    36    3
## 207     98    8    36    3
## 208    116   10    36    3
## 209    145   12    36    3
## 210    166   14    36    3
## 211    198   16    36    3
## 212    227   18    36    3
## 213    225   20    36    3
## 214    220   21    36    3
## 215     41    0    37    3
## 216     48    2    37    3
## 217     56    4    37    3
## 218     68    6    37    3
## 219     80    8    37    3
## 220     83   10    37    3
## 221    103   12    37    3
## 222    112   14    37    3
## 223    135   16    37    3
## 224    157   18    37    3
## 225    169   20    37    3
## 226    178   21    37    3
## 227     39    0    33    3
## 228     50    2    33    3
## 229     63    4    33    3
## 230     77    6    33    3
## 231     96    8    33    3
## 232    111   10    33    3
## 233    137   12    33    3
## 234    144   14    33    3
## 235    151   16    33    3
## 236    146   18    33    3
## 237    156   20    33    3
## 238    147   21    33    3
## 239     40    0    21    2
## 240     50    2    21    2
## 241     62    4    21    2
## 242     86    6    21    2
## 243    125    8    21    2
## 244    163   10    21    2
## 245    217   12    21    2
## 246    240   14    21    2
## 247    275   16    21    2
## 248    307   18    21    2
## 249    318   20    21    2
## 250    331   21    21    2
## 251     39    0    29    2
## 252     48    2    29    2
## 253     59    4    29    2
## 254     74    6    29    2
## 255     87    8    29    2
## 256    106   10    29    2
## 257    134   12    29    2
## 258    150   14    29    2
## 259    187   16    29    2
## 260    230   18    29    2
## 261    279   20    29    2
## 262    309   21    29    2
## 263     40    0    25    2
## 264     49    2    25    2
## 265     62    4    25    2
## 266     78    6    25    2
## 267    102    8    25    2
## 268    124   10    25    2
## 269    146   12    25    2
## 270    164   14    25    2
## 271    197   16    25    2
## 272    231   18    25    2
## 273    259   20    25    2
## 274    265   21    25    2
## 275     42    0    26    2
## 276     48    2    26    2
## 277     57    4    26    2
## 278     74    6    26    2
## 279     93    8    26    2
## 280    114   10    26    2
## 281    136   12    26    2
## 282    147   14    26    2
## 283    169   16    26    2
## 284    205   18    26    2
## 285    236   20    26    2
## 286    251   21    26    2
## 287     39    0    28    2
## 288     46    2    28    2
## 289     58    4    28    2
## 290     73    6    28    2
## 291     92    8    28    2
## 292    114   10    28    2
## 293    145   12    28    2
## 294    156   14    28    2
## 295    184   16    28    2
## 296    207   18    28    2
## 297    212   20    28    2
## 298    233   21    28    2
## 299     39    0    27    2
## 300     46    2    27    2
## 301     58    4    27    2
## 302     73    6    27    2
## 303     87    8    27    2
## 304    100   10    27    2
## 305    115   12    27    2
## 306    123   14    27    2
## 307    144   16    27    2
## 308    163   18    27    2
## 309    185   20    27    2
## 310    192   21    27    2
## 311     43    0    23    2
## 312     52    2    23    2
## 313     61    4    23    2
## 314     73    6    23    2
## 315     90    8    23    2
## 316    103   10    23    2
## 317    127   12    23    2
## 318    135   14    23    2
## 319    145   16    23    2
## 320    163   18    23    2
## 321    170   20    23    2
## 322    175   21    23    2
## 323     41    0    22    2
## 324     55    2    22    2
## 325     64    4    22    2
## 326     77    6    22    2
## 327     90    8    22    2
## 328     95   10    22    2
## 329    108   12    22    2
## 330    111   14    22    2
## 331    131   16    22    2
## 332    148   18    22    2
## 333    164   20    22    2
## 334    167   21    22    2
## 335     42    0    30    2
## 336     48    2    30    2
## 337     59    4    30    2
## 338     72    6    30    2
## 339     85    8    30    2
## 340     98   10    30    2
## 341    115   12    30    2
## 342    122   14    30    2
## 343    143   16    30    2
## 344    151   18    30    2
## 345    157   20    30    2
## 346    150   21    30    2
## 347     42    0    24    2
## 348     52    2    24    2
## 349     58    4    24    2
## 350     74    6    24    2
## 351     66    8    24    2
## 352     68   10    24    2
## 353     70   12    24    2
## 354     71   14    24    2
## 355     72   16    24    2
## 356     72   18    24    2
## 357     76   20    24    2
## 358     74   21    24    2
## 359     41    0     7    1
## 360     49    2     7    1
## 361     57    4     7    1
## 362     71    6     7    1
## 363     89    8     7    1
## 364    112   10     7    1
## 365    146   12     7    1
## 366    174   14     7    1
## 367    218   16     7    1
## 368    250   18     7    1
## 369    288   20     7    1
## 370    305   21     7    1
## 371     41    0    14    1
## 372     49    2    14    1
## 373     62    4    14    1
## 374     79    6    14    1
## 375    101    8    14    1
## 376    128   10    14    1
## 377    164   12    14    1
## 378    192   14    14    1
## 379    227   16    14    1
## 380    248   18    14    1
## 381    259   20    14    1
## 382    266   21    14    1
## 383     41    0     5    1
## 384     42    2     5    1
## 385     48    4     5    1
## 386     60    6     5    1
## 387     79    8     5    1
## 388    106   10     5    1
## 389    141   12     5    1
## 390    164   14     5    1
## 391    197   16     5    1
## 392    199   18     5    1
## 393    220   20     5    1
## 394    223   21     5    1
## 395     40    0     2    1
## 396     49    2     2    1
## 397     58    4     2    1
## 398     72    6     2    1
## 399     84    8     2    1
## 400    103   10     2    1
## 401    122   12     2    1
## 402    138   14     2    1
## 403    162   16     2    1
## 404    187   18     2    1
## 405    209   20     2    1
## 406    215   21     2    1
## 407     41    0    12    1
## 408     49    2    12    1
## 409     56    4    12    1
## 410     62    6    12    1
## 411     72    8    12    1
## 412     88   10    12    1
## 413    119   12    12    1
## 414    135   14    12    1
## 415    162   16    12    1
## 416    185   18    12    1
## 417    195   20    12    1
## 418    205   21    12    1
## 419     42    0     1    1
## 420     51    2     1    1
## 421     59    4     1    1
## 422     64    6     1    1
## 423     76    8     1    1
## 424     93   10     1    1
## 425    106   12     1    1
## 426    125   14     1    1
## 427    149   16     1    1
## 428    171   18     1    1
## 429    199   20     1    1
## 430    205   21     1    1
## 431     43    0     3    1
## 432     39    2     3    1
## 433     55    4     3    1
## 434     67    6     3    1
## 435     84    8     3    1
## 436     99   10     3    1
## 437    115   12     3    1
## 438    138   14     3    1
## 439    163   16     3    1
## 440    187   18     3    1
## 441    198   20     3    1
## 442    202   21     3    1
## 443     43    0    11    1
## 444     51    2    11    1
## 445     63    4    11    1
## 446     84    6    11    1
## 447    112    8    11    1
## 448    139   10    11    1
## 449    168   12    11    1
## 450    177   14    11    1
## 451    182   16    11    1
## 452    184   18    11    1
## 453    181   20    11    1
## 454    175   21    11    1
## 455     41    0     6    1
## 456     49    2     6    1
## 457     59    4     6    1
## 458     74    6     6    1
## 459     97    8     6    1
## 460    124   10     6    1
## 461    141   12     6    1
## 462    148   14     6    1
## 463    155   16     6    1
## 464    160   18     6    1
## 465    160   20     6    1
## 466    157   21     6    1
## 467     42    0     4    1
## 468     49    2     4    1
## 469     56    4     4    1
## 470     67    6     4    1
## 471     74    8     4    1
## 472     87   10     4    1
## 473    102   12     4    1
## 474    108   14     4    1
## 475    136   16     4    1
## 476    154   18     4    1
## 477    160   20     4    1
## 478    157   21     4    1
## 479     43    0    19    1
## 480     48    2    19    1
## 481     55    4    19    1
## 482     62    6    19    1
## 483     65    8    19    1
## 484     71   10    19    1
## 485     82   12    19    1
## 486     88   14    19    1
## 487    106   16    19    1
## 488    120   18    19    1
## 489    144   20    19    1
## 490    157   21    19    1
## 491     42    0    17    1
## 492     51    2    17    1
## 493     61    4    17    1
## 494     72    6    17    1
## 495     83    8    17    1
## 496     89   10    17    1
## 497     98   12    17    1
## 498    103   14    17    1
## 499    113   16    17    1
## 500    123   18    17    1
## 501    133   20    17    1
## 502    142   21    17    1
## 503     42    0     8    1
## 504     50    2     8    1
## 505     61    4     8    1
## 506     71    6     8    1
## 507     84    8     8    1
## 508     93   10     8    1
## 509    110   12     8    1
## 510    116   14     8    1
## 511    126   16     8    1
## 512    134   18     8    1
## 513    125   20     8    1
## 514     41    0    10    1
## 515     44    2    10    1
## 516     52    4    10    1
## 517     63    6    10    1
## 518     74    8    10    1
## 519     81   10    10    1
## 520     89   12    10    1
## 521     96   14    10    1
## 522    101   16    10    1
## 523    112   18    10    1
## 524    120   20    10    1
## 525    124   21    10    1
## 526     41    0    20    1
## 527     47    2    20    1
## 528     54    4    20    1
## 529     58    6    20    1
## 530     65    8    20    1
## 531     73   10    20    1
## 532     77   12    20    1
## 533     89   14    20    1
## 534     98   16    20    1
## 535    107   18    20    1
## 536    115   20    20    1
## 537    117   21    20    1
## 538     42    0     9    1
## 539     51    2     9    1
## 540     59    4     9    1
## 541     68    6     9    1
## 542     85    8     9    1
## 543     96   10     9    1
## 544     90   12     9    1
## 545     92   14     9    1
## 546     93   16     9    1
## 547    100   18     9    1
## 548    100   20     9    1
## 549     98   21     9    1
## 550     41    0    13    1
## 551     48    2    13    1
## 552     53    4    13    1
## 553     60    6    13    1
## 554     65    8    13    1
## 555     67   10    13    1
## 556     71   12    13    1
## 557     70   14    13    1
## 558     71   16    13    1
## 559     81   18    13    1
## 560     91   20    13    1
## 561     96   21    13    1
## 562     41    0    15    1
## 563     49    2    15    1
## 564     56    4    15    1
## 565     64    6    15    1
## 566     68    8    15    1
## 567     68   10    15    1
## 568     67   12    15    1
## 569     68   14    15    1
## 570     41    0    16    1
## 571     45    2    16    1
## 572     49    4    16    1
## 573     51    6    16    1
## 574     57    8    16    1
## 575     51   10    16    1
## 576     54   12    16    1
## 577     39    0    18    1
## 578     35    2    18    1
# Menambahkan kolom baru dengan mutate()
ChickWeight_mutated <- ChickWeight %>%
  mutate(Weight_per_Kg = weight/100)
print(head(ChickWeight_mutated))  # Menampilkan data yang sudah dimodifikasi
##   weight Time Chick Diet Weight_per_Kg
## 1     42    0     1    1          0.42
## 2     51    2     1    1          0.51
## 3     59    4     1    1          0.59
## 4     64    6     1    1          0.64
## 5     76    8     1    1          0.76
## 6     93   10     1    1          0.93
# Kombinasi: Memilih kolom, menyaring jenis ayam, dan mengurutkan berdasarkan berat
data_combined <- ChickWeight %>%
  select(Chick, weight) %>%    # Memilih kolom yang diperlukan
  filter(Chick == 2) %>%            # Menyaring data untuk bulan Mei
  arrange(desc(weight))                     # Mengurutkan berat ayam secara descending

head(data_combined)
##   Chick weight
## 1     2    215
## 2     2    209
## 3     2    187
## 4     2    162
## 5     2    138
## 6     2    122
# Membuat scatterplot antara Time dan Weight
plot(ChickWeight$Time, ChickWeight$Weight,
     xlab = "Time",                 # Label sumbu-x
     ylab = "Weight",                      # Label sumbu-y
     main = "Scatterplot Weight vs Time", # Judul plot
     pch = 19, col = "brown")                    # besar titik dan warnanya