AP
Size: a a a
AP
PU
PU
> xlsx_data <- read_xlsx('./data/xls_example.xlsx',
+ col_types = c('text', 'text', rep('numeric', 3)))
> xlsx_data
# A tibble: 7 x 5
company item_code barcode amount price
<chr> <chr> <dbl> <dbl> <dbl>
1 xxx 20000559 4601026307584 3 480.
2 xxx 20000779 4603182002259 4 27.0
3 xxx 13117 4607072020156 2 354.
4 yyy 40000289 3574661287522 6 208.
5 yyy 40000274 3574661287539 2 175.
6 zzz 10000581 4602196002682 1 537.
7 zzz 20000458 4601026308567 9 371.
Ю
А[
Ю
A
AP
A
PU
PU
MS
PU
A
PU
PU
A
A
A