library(tidyverse)
## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr 1.1.0 ✔ readr 2.1.4
## ✔ forcats 1.0.0 ✔ stringr 1.5.0
## ✔ ggplot2 3.4.1 ✔ tibble 3.1.8
## ✔ lubridate 1.9.2 ✔ tidyr 1.3.0
## ✔ purrr 1.0.1
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
## ℹ Use the ]8;;http://conflicted.r-lib.org/conflicted package]8;; to force all conflicts to become errors
stock_df <- read.csv("C:/Users/jerem/Documents/Financial Database/stock_df.csv")
stock_df_long <- stock_df %>%
pivot_longer(
cols = -company,
names_to = "week",
values_to = "price",
names_pattern = "X(\\d{4}_week\\d+)"
)
# Print the resulting long format data frame
print(stock_df_long, n = nrow(stock_df_long))
## # A tibble: 525 × 3
## company week price
## <chr> <chr> <dbl>
## 1 Amazon 2019_week1 1848.
## 2 Amazon 2019_week2 1641.
## 3 Amazon 2019_week3 1696.
## 4 Amazon 2019_week4 1671.
## 5 Amazon 2019_week5 1626.
## 6 Amazon 2019_week6 1588.
## 7 Amazon 2019_week7 1608.
## 8 Amazon 2019_week8 1632.
## 9 Amazon 2019_week9 1672.
## 10 Amazon 2019_week10 1621.
## 11 Amazon 2019_week11 1712.
## 12 Amazon 2019_week12 1765.
## 13 Amazon 2019_week13 1781.
## 14 Amazon 2019_week14 1837.
## 15 Amazon 2019_week15 1843.
## 16 Amazon 2019_week16 1862.
## 17 Amazon 2019_week17 1951.
## 18 Amazon 2019_week18 1962.
## 19 Amazon 2019_week19 1890.
## 20 Amazon 2019_week20 1869
## 21 Amazon 2019_week21 1823.
## 22 Amazon 2019_week22 1775.
## 23 Amazon 2019_week23 1804.
## 24 Amazon 2019_week24 1870.
## 25 Amazon 2019_week25 1911.
## 26 Amazon 2019_week26 1894.
## 27 Amazon 2019_week27 1943.
## 28 Amazon 2019_week28 2011
## 29 Amazon 2019_week29 1965.
## 30 Amazon 2019_week30 1943.
## 31 Amazon 2019_week31 1823.
## 32 Amazon 2019_week32 1808.
## 33 Amazon 2019_week33 1793.
## 34 Amazon 2019_week34 1750.
## 35 Amazon 2019_week35 1776.
## 36 Amazon 2019_week36 1834.
## 37 Amazon 2019_week37 1839.
## 38 Amazon 2019_week38 1794.
## 39 Amazon 2019_week39 1725.
## 40 Amazon 2019_week40 1740.
## 41 Amazon 2019_week41 1732.
## 42 Amazon 2019_week42 1758.
## 43 Amazon 2019_week43 1761.
## 44 Amazon 2019_week44 1791.
## 45 Amazon 2019_week45 1786.
## 46 Amazon 2019_week46 1739.
## 47 Amazon 2019_week47 1746.
## 48 Amazon 2019_week48 1801.
## 49 Amazon 2019_week49 1752.
## 50 Amazon 2019_week50 1761.
## 51 Amazon 2019_week51 1786.
## 52 Amazon 2019_week52 1870.
## 53 Amazon 2020_week1 1875.
## 54 Amazon 2020_week2 1883.
## 55 Amazon 2020_week3 1865.
## 56 Amazon 2020_week4 1862.
## 57 Amazon 2020_week5 2009.
## 58 Amazon 2020_week6 2079.
## 59 Amazon 2020_week7 2135.
## 60 Amazon 2020_week8 2096.
## 61 Amazon 2020_week9 1884.
## 62 Amazon 2020_week10 1901.
## 63 Amazon 2020_week11 1785
## 64 Amazon 2020_week12 1846.
## 65 Amazon 2020_week13 1900.
## 66 Amazon 2020_week14 1907.
## 67 Amazon 2020_week15 2043.
## 68 Amazon 2020_week16 2375
## 69 Amazon 2020_week17 2410.
## 70 Amazon 2020_week18 2286.
## 71 Amazon 2020_week19 2380.
## 72 Amazon 2020_week20 2410.
## 73 Amazon 2020_week21 2437.
## 74 Amazon 2020_week22 2442.
## 75 Amazon 2020_week23 2483
## 76 Amazon 2020_week24 2545.
## 77 Amazon 2020_week25 2675.
## 78 Amazon 2020_week26 2693.
## 79 Amazon 2020_week27 2890.
## 80 Amazon 2020_week28 3200
## 81 Amazon 2020_week29 2962.
## 82 Amazon 2020_week30 3009.
## 83 Amazon 2020_week31 3165.
## 84 Amazon 2020_week32 3167.
## 85 Amazon 2020_week33 3148.
## 86 Amazon 2020_week34 3285.
## 87 Amazon 2020_week35 3402.
## 88 Amazon 2020_week36 3295.
## 89 Amazon 2020_week37 3116.
## 90 Amazon 2020_week38 2955.
## 91 Amazon 2020_week39 3095.
## 92 Amazon 2020_week40 3125
## 93 Amazon 2020_week41 3287.
## 94 Amazon 2020_week42 3273.
## 95 Amazon 2020_week43 3204.
## 96 Amazon 2020_week44 3036.
## 97 Amazon 2020_week45 3311.
## 98 Amazon 2020_week46 3129.
## 99 Amazon 2020_week47 3099.
## 100 Amazon 2020_week48 3195.
## 101 Amazon 2020_week49 3163.
## 102 Amazon 2020_week50 3116.
## 103 Amazon 2020_week51 3202.
## 104 Amazon 2020_week52 3173.
## 105 Amazon 2020_week53 3257.
## 106 Apple 2019_week1 73.4
## 107 Apple 2019_week2 38.1
## 108 Apple 2019_week3 39.2
## 109 Apple 2019_week4 39.4
## 110 Apple 2019_week5 41.6
## 111 Apple 2019_week6 42.6
## 112 Apple 2019_week7 42.6
## 113 Apple 2019_week8 43.2
## 114 Apple 2019_week9 43.7
## 115 Apple 2019_week10 43.2
## 116 Apple 2019_week11 46.5
## 117 Apple 2019_week12 47.8
## 118 Apple 2019_week13 47.5
## 119 Apple 2019_week14 49.2
## 120 Apple 2019_week15 49.7
## 121 Apple 2019_week16 51.0
## 122 Apple 2019_week17 51.1
## 123 Apple 2019_week18 52.9
## 124 Apple 2019_week19 49.3
## 125 Apple 2019_week20 47.2
## 126 Apple 2019_week21 44.7
## 127 Apple 2019_week22 43.8
## 128 Apple 2019_week23 47.5
## 129 Apple 2019_week24 48.2
## 130 Apple 2019_week25 49.7
## 131 Apple 2019_week26 49.5
## 132 Apple 2019_week27 51.1
## 133 Apple 2019_week28 50.8
## 134 Apple 2019_week29 50.6
## 135 Apple 2019_week30 51.9
## 136 Apple 2019_week31 51.0
## 137 Apple 2019_week32 50.2
## 138 Apple 2019_week33 51.6
## 139 Apple 2019_week34 50.7
## 140 Apple 2019_week35 52.2
## 141 Apple 2019_week36 53.3
## 142 Apple 2019_week37 54.7
## 143 Apple 2019_week38 54.4
## 144 Apple 2019_week39 54.7
## 145 Apple 2019_week40 56.8
## 146 Apple 2019_week41 59.1
## 147 Apple 2019_week42 59.1
## 148 Apple 2019_week43 61.6
## 149 Apple 2019_week44 64.0
## 150 Apple 2019_week45 65.0
## 151 Apple 2019_week46 66.4
## 152 Apple 2019_week47 65.4
## 153 Apple 2019_week48 66.8
## 154 Apple 2019_week49 67.7
## 155 Apple 2019_week50 68.8
## 156 Apple 2019_week51 69.9
## 157 Apple 2019_week52 72.4
## 158 Apple 2020_week1 74.4
## 159 Apple 2020_week2 77.6
## 160 Apple 2020_week3 79.7
## 161 Apple 2020_week4 79.6
## 162 Apple 2020_week5 77.4
## 163 Apple 2020_week6 80.0
## 164 Apple 2020_week7 81.2
## 165 Apple 2020_week8 78.3
## 166 Apple 2020_week9 68.3
## 167 Apple 2020_week10 72.3
## 168 Apple 2020_week11 69.5
## 169 Apple 2020_week12 57.3
## 170 Apple 2020_week13 61.9
## 171 Apple 2020_week14 60.4
## 172 Apple 2020_week15 67.0
## 173 Apple 2020_week16 70.7
## 174 Apple 2020_week17 70.7
## 175 Apple 2020_week18 72.3
## 176 Apple 2020_week19 77.5
## 177 Apple 2020_week20 76.9
## 178 Apple 2020_week21 79.7
## 179 Apple 2020_week22 79.5
## 180 Apple 2020_week23 82.9
## 181 Apple 2020_week24 84.7
## 182 Apple 2020_week25 87.4
## 183 Apple 2020_week26 88.4
## 184 Apple 2020_week27 91.0
## 185 Apple 2020_week28 95.9
## 186 Apple 2020_week29 96.3
## 187 Apple 2020_week30 92.6
## 188 Apple 2020_week31 106.
## 189 Apple 2020_week32 111.
## 190 Apple 2020_week33 115.
## 191 Apple 2020_week34 124.
## 192 Apple 2020_week35 125.
## 193 Apple 2020_week36 121.
## 194 Apple 2020_week37 112
## 195 Apple 2020_week38 107.
## 196 Apple 2020_week39 112.
## 197 Apple 2020_week40 113.
## 198 Apple 2020_week41 117.
## 199 Apple 2020_week42 119.
## 200 Apple 2020_week43 115.
## 201 Apple 2020_week44 109.
## 202 Apple 2020_week45 119.
## 203 Apple 2020_week46 119.
## 204 Apple 2020_week47 117.
## 205 Apple 2020_week48 117.
## 206 Apple 2020_week49 122.
## 207 Apple 2020_week50 122.
## 208 Apple 2020_week51 127.
## 209 Apple 2020_week52 132.
## 210 Apple 2020_week53 133.
## 211 Facebook 2019_week1 205.
## 212 Facebook 2019_week2 144.
## 213 Facebook 2019_week3 150.
## 214 Facebook 2019_week4 149.
## 215 Facebook 2019_week5 166.
## 216 Facebook 2019_week6 167.
## 217 Facebook 2019_week7 162.
## 218 Facebook 2019_week8 162.
## 219 Facebook 2019_week9 162.
## 220 Facebook 2019_week10 170.
## 221 Facebook 2019_week11 166.
## 222 Facebook 2019_week12 164.
## 223 Facebook 2019_week13 167.
## 224 Facebook 2019_week14 176.
## 225 Facebook 2019_week15 179.
## 226 Facebook 2019_week16 178.
## 227 Facebook 2019_week17 191.
## 228 Facebook 2019_week18 195.
## 229 Facebook 2019_week19 188.
## 230 Facebook 2019_week20 185.
## 231 Facebook 2019_week21 181.
## 232 Facebook 2019_week22 177.
## 233 Facebook 2019_week23 173.
## 234 Facebook 2019_week24 181.
## 235 Facebook 2019_week25 191.
## 236 Facebook 2019_week26 193
## 237 Facebook 2019_week27 196.
## 238 Facebook 2019_week28 205.
## 239 Facebook 2019_week29 198.
## 240 Facebook 2019_week30 200.
## 241 Facebook 2019_week31 189.
## 242 Facebook 2019_week32 188.
## 243 Facebook 2019_week33 184.
## 244 Facebook 2019_week34 178.
## 245 Facebook 2019_week35 186.
## 246 Facebook 2019_week36 187.
## 247 Facebook 2019_week37 187.
## 248 Facebook 2019_week38 190.
## 249 Facebook 2019_week39 177.
## 250 Facebook 2019_week40 180.
## 251 Facebook 2019_week41 184.
## 252 Facebook 2019_week42 186.
## 253 Facebook 2019_week43 188.
## 254 Facebook 2019_week44 194.
## 255 Facebook 2019_week45 191.
## 256 Facebook 2019_week46 195.
## 257 Facebook 2019_week47 199.
## 258 Facebook 2019_week48 202.
## 259 Facebook 2019_week49 201.
## 260 Facebook 2019_week50 194.
## 261 Facebook 2019_week51 206.
## 262 Facebook 2019_week52 208.
## 263 Facebook 2020_week1 209.
## 264 Facebook 2020_week2 218.
## 265 Facebook 2020_week3 222.
## 266 Facebook 2020_week4 218.
## 267 Facebook 2020_week5 202.
## 268 Facebook 2020_week6 212.
## 269 Facebook 2020_week7 214.
## 270 Facebook 2020_week8 210.
## 271 Facebook 2020_week9 192.
## 272 Facebook 2020_week10 181.
## 273 Facebook 2020_week11 170.
## 274 Facebook 2020_week12 150.
## 275 Facebook 2020_week13 157.
## 276 Facebook 2020_week14 154.
## 277 Facebook 2020_week15 175.
## 278 Facebook 2020_week16 179.
## 279 Facebook 2020_week17 190.
## 280 Facebook 2020_week18 202.
## 281 Facebook 2020_week19 212.
## 282 Facebook 2020_week20 211.
## 283 Facebook 2020_week21 235.
## 284 Facebook 2020_week22 225.
## 285 Facebook 2020_week23 231.
## 286 Facebook 2020_week24 229.
## 287 Facebook 2020_week25 239.
## 288 Facebook 2020_week26 216.
## 289 Facebook 2020_week27 233.
## 290 Facebook 2020_week28 245.
## 291 Facebook 2020_week29 242.
## 292 Facebook 2020_week30 231.
## 293 Facebook 2020_week31 254.
## 294 Facebook 2020_week32 268.
## 295 Facebook 2020_week33 261.
## 296 Facebook 2020_week34 267.
## 297 Facebook 2020_week35 294.
## 298 Facebook 2020_week36 283.
## 299 Facebook 2020_week37 267.
## 300 Facebook 2020_week38 253.
## 301 Facebook 2020_week39 255.
## 302 Facebook 2020_week40 260.
## 303 Facebook 2020_week41 264.
## 304 Facebook 2020_week42 266.
## 305 Facebook 2020_week43 285.
## 306 Facebook 2020_week44 263.
## 307 Facebook 2020_week45 293.
## 308 Facebook 2020_week46 277.
## 309 Facebook 2020_week47 270.
## 310 Facebook 2020_week48 278.
## 311 Facebook 2020_week49 280.
## 312 Facebook 2020_week50 274.
## 313 Facebook 2020_week51 276.
## 314 Facebook 2020_week52 267.
## 315 Facebook 2020_week53 273.
## 316 Google 2019_week1 1337.
## 317 Google 2019_week2 1057.
## 318 Google 2019_week3 1098.
## 319 Google 2019_week4 1091.
## 320 Google 2019_week5 1111.
## 321 Google 2019_week6 1095.
## 322 Google 2019_week7 1114.
## 323 Google 2019_week8 1110.
## 324 Google 2019_week9 1141.
## 325 Google 2019_week10 1142.
## 326 Google 2019_week11 1184.
## 327 Google 2019_week12 1206.
## 328 Google 2019_week13 1173.
## 329 Google 2019_week14 1207.
## 330 Google 2019_week15 1218.
## 331 Google 2019_week16 1236.
## 332 Google 2019_week17 1272.
## 333 Google 2019_week18 1185.
## 334 Google 2019_week19 1164.
## 335 Google 2019_week20 1162.
## 336 Google 2019_week21 1133.
## 337 Google 2019_week22 1104.
## 338 Google 2019_week23 1066.
## 339 Google 2019_week24 1085.
## 340 Google 2019_week25 1122.
## 341 Google 2019_week26 1081.
## 342 Google 2019_week27 1132.
## 343 Google 2019_week28 1145.
## 344 Google 2019_week29 1130.
## 345 Google 2019_week30 1250.
## 346 Google 2019_week31 1194.
## 347 Google 2019_week32 1188.
## 348 Google 2019_week33 1178.
## 349 Google 2019_week34 1151.
## 350 Google 2019_week35 1188.
## 351 Google 2019_week36 1205.
## 352 Google 2019_week37 1240.
## 353 Google 2019_week38 1230.
## 354 Google 2019_week39 1225.
## 355 Google 2019_week40 1209
## 356 Google 2019_week41 1215.
## 357 Google 2019_week42 1245.
## 358 Google 2019_week43 1265.
## 359 Google 2019_week44 1274.
## 360 Google 2019_week45 1311.
## 361 Google 2019_week46 1335.
## 362 Google 2019_week47 1295.
## 363 Google 2019_week48 1305.
## 364 Google 2019_week49 1341.
## 365 Google 2019_week50 1348.
## 366 Google 2019_week51 1350.
## 367 Google 2019_week52 1352.
## 368 Google 2020_week1 1361.
## 369 Google 2020_week2 1430.
## 370 Google 2020_week3 1480.
## 371 Google 2020_week4 1467.
## 372 Google 2020_week5 1434.
## 373 Google 2020_week6 1479.
## 374 Google 2020_week7 1521.
## 375 Google 2020_week8 1485.
## 376 Google 2020_week9 1339.
## 377 Google 2020_week10 1298.
## 378 Google 2020_week11 1220.
## 379 Google 2020_week12 1072.
## 380 Google 2020_week13 1111.
## 381 Google 2020_week14 1098.
## 382 Google 2020_week15 1211.
## 383 Google 2020_week16 1283.
## 384 Google 2020_week17 1279.
## 385 Google 2020_week18 1321.
## 386 Google 2020_week19 1388.
## 387 Google 2020_week20 1373.
## 388 Google 2020_week21 1410.
## 389 Google 2020_week22 1429.
## 390 Google 2020_week23 1438.
## 391 Google 2020_week24 1413.
## 392 Google 2020_week25 1432.
## 393 Google 2020_week26 1360.
## 394 Google 2020_week27 1465.
## 395 Google 2020_week28 1542.
## 396 Google 2020_week29 1516.
## 397 Google 2020_week30 1512.
## 398 Google 2020_week31 1483.
## 399 Google 2020_week32 1494.
## 400 Google 2020_week33 1508.
## 401 Google 2020_week34 1580.
## 402 Google 2020_week35 1644.
## 403 Google 2020_week36 1591.
## 404 Google 2020_week37 1521.
## 405 Google 2020_week38 1460.
## 406 Google 2020_week39 1445.
## 407 Google 2020_week40 1458.
## 408 Google 2020_week41 1515.
## 409 Google 2020_week42 1573.
## 410 Google 2020_week43 1641
## 411 Google 2020_week44 1621.
## 412 Google 2020_week45 1762.
## 413 Google 2020_week46 1777.
## 414 Google 2020_week47 1742.
## 415 Google 2020_week48 1793.
## 416 Google 2020_week49 1828.
## 417 Google 2020_week50 1782.
## 418 Google 2020_week51 1731.
## 419 Google 2020_week52 1739.
## 420 Google 2020_week53 1752.
## 421 Microsoft 2019_week1 158.
## 422 Microsoft 2019_week2 103.
## 423 Microsoft 2019_week3 108.
## 424 Microsoft 2019_week4 107.
## 425 Microsoft 2019_week5 103.
## 426 Microsoft 2019_week6 106.
## 427 Microsoft 2019_week7 108.
## 428 Microsoft 2019_week8 111.
## 429 Microsoft 2019_week9 113.
## 430 Microsoft 2019_week10 111.
## 431 Microsoft 2019_week11 116.
## 432 Microsoft 2019_week12 117.
## 433 Microsoft 2019_week13 118.
## 434 Microsoft 2019_week14 120.
## 435 Microsoft 2019_week15 121.
## 436 Microsoft 2019_week16 123.
## 437 Microsoft 2019_week17 130.
## 438 Microsoft 2019_week18 129.
## 439 Microsoft 2019_week19 127.
## 440 Microsoft 2019_week20 128.
## 441 Microsoft 2019_week21 126.
## 442 Microsoft 2019_week22 124.
## 443 Microsoft 2019_week23 131.
## 444 Microsoft 2019_week24 132.
## 445 Microsoft 2019_week25 137.
## 446 Microsoft 2019_week26 134.
## 447 Microsoft 2019_week27 137.
## 448 Microsoft 2019_week28 139.
## 449 Microsoft 2019_week29 137.
## 450 Microsoft 2019_week30 141.
## 451 Microsoft 2019_week31 137.
## 452 Microsoft 2019_week32 138.
## 453 Microsoft 2019_week33 136.
## 454 Microsoft 2019_week34 133.
## 455 Microsoft 2019_week35 138.
## 456 Microsoft 2019_week36 139.
## 457 Microsoft 2019_week37 137.
## 458 Microsoft 2019_week38 139.
## 459 Microsoft 2019_week39 138.
## 460 Microsoft 2019_week40 138.
## 461 Microsoft 2019_week41 140.
## 462 Microsoft 2019_week42 137.
## 463 Microsoft 2019_week43 141.
## 464 Microsoft 2019_week44 144.
## 465 Microsoft 2019_week45 146.
## 466 Microsoft 2019_week46 150.
## 467 Microsoft 2019_week47 150.
## 468 Microsoft 2019_week48 151.
## 469 Microsoft 2019_week49 152.
## 470 Microsoft 2019_week50 155.
## 471 Microsoft 2019_week51 157.
## 472 Microsoft 2019_week52 159.
## 473 Microsoft 2020_week1 159.
## 474 Microsoft 2020_week2 161.
## 475 Microsoft 2020_week3 167.
## 476 Microsoft 2020_week4 165.
## 477 Microsoft 2020_week5 170.
## 478 Microsoft 2020_week6 184.
## 479 Microsoft 2020_week7 185.
## 480 Microsoft 2020_week8 179.
## 481 Microsoft 2020_week9 162.
## 482 Microsoft 2020_week10 162.
## 483 Microsoft 2020_week11 159.
## 484 Microsoft 2020_week12 137.
## 485 Microsoft 2020_week13 150.
## 486 Microsoft 2020_week14 154.
## 487 Microsoft 2020_week15 165.
## 488 Microsoft 2020_week16 179.
## 489 Microsoft 2020_week17 175.
## 490 Microsoft 2020_week18 175.
## 491 Microsoft 2020_week19 185.
## 492 Microsoft 2020_week20 183.
## 493 Microsoft 2020_week21 184.
## 494 Microsoft 2020_week22 183.
## 495 Microsoft 2020_week23 187.
## 496 Microsoft 2020_week24 188.
## 497 Microsoft 2020_week25 195.
## 498 Microsoft 2020_week26 196.
## 499 Microsoft 2020_week27 206.
## 500 Microsoft 2020_week28 214.
## 501 Microsoft 2020_week29 203.
## 502 Microsoft 2020_week30 201.
## 503 Microsoft 2020_week31 205.
## 504 Microsoft 2020_week32 212.
## 505 Microsoft 2020_week33 209.
## 506 Microsoft 2020_week34 213.
## 507 Microsoft 2020_week35 229.
## 508 Microsoft 2020_week36 214.
## 509 Microsoft 2020_week37 204.
## 510 Microsoft 2020_week38 200.
## 511 Microsoft 2020_week39 208.
## 512 Microsoft 2020_week40 206.
## 513 Microsoft 2020_week41 216.
## 514 Microsoft 2020_week42 220.
## 515 Microsoft 2020_week43 216.
## 516 Microsoft 2020_week44 202.
## 517 Microsoft 2020_week45 224.
## 518 Microsoft 2020_week46 217.
## 519 Microsoft 2020_week47 210.
## 520 Microsoft 2020_week48 215.
## 521 Microsoft 2020_week49 214.
## 522 Microsoft 2020_week50 213.
## 523 Microsoft 2020_week51 219.
## 524 Microsoft 2020_week52 223.
## 525 Microsoft 2020_week53 222.