library(knitr)
df <- read.csv("set.csv", stringsAsFactors = FALSE, check.names = FALSE)
View(df)
kable(head(df, 20), caption = "Dataset (First 20 Rows)")
Dataset (First 20 Rows)
| 1101 |
TCC |
2026/06 |
2 |
299,322,066 |
2,377,986 |
180,932,527 |
| 1102 |
ACC |
2026/06 |
2 |
208,363,284 |
1,711,308 |
124,129,705 |
| 1103 |
CHC |
2026/06 |
2 |
18,790,600 |
2,187 |
11,160,525 |
| 1104 |
UCC |
2026/06 |
2 |
25,398,552 |
261,095 |
18,403,078 |
| 1108 |
Lucky Cement |
2026/06 |
2 |
5,467,928 |
44,212 |
5,585,384 |
| 1109 |
HSINGTA |
2026/06 |
2 |
10,178,824 |
46,837 |
4,963,863 |
| 1110 |
SE CEMENT |
2026/06 |
2 |
9,676,727 |
68,181 |
8,951,816 |
| 1201 |
WEI CHUAN |
2026/06 |
2 |
7,965,188 |
-84,881 |
6,224,575 |
| 1203 |
Ve Wong |
2026/06 |
2 |
7,356,233 |
189,456 |
10,440,000 |
| 1210 |
GREATWALL |
2026/06 |
2 |
34,750,389 |
913,566 |
49,659,569 |
| 1213 |
Oceanic Bev. |
2026/06 |
2 |
621,677 |
-10,442 |
463,742 |
| 1215 |
CPE |
2026/06 |
2 |
11,363,139 |
760,191 |
33,458,665 |
| 1216 |
Uni-President |
2026/06 |
2 |
211,740,391 |
10,256,839 |
423,310,118 |
| 1217 |
AGV |
2026/06 |
2 |
8,459,959 |
-1,644 |
4,856,118 |
| 1218 |
Taisun |
2026/06 |
2 |
11,529,396 |
-217,593 |
8,924,982 |
| 1219 |
FWUSOW |
2026/06 |
2 |
4,009,788 |
-203,703 |
4,265,475 |
| 1220 |
Tairoun |
2026/06 |
2 |
2,488,330 |
1,290 |
2,036,397 |
| 1225 |
FOPCO |
2026/06 |
2 |
4,272,269 |
-43,744 |
7,062,112 |
| 1227 |
SFC |
2026/06 |
2 |
18,583,130 |
43,446 |
26,857,892 |
| 1229 |
LHIHC |
2026/06 |
2 |
88,986,823 |
147,352 |
77,136,525 |