setwd('D:/Rcode/RPub')
library(VNDS)
library(stringr)
bsVND <- tq_balancesheet("VND",2017,5,"Q1")
bsVND$itemName <- str_trim(bsVND$itemName)
#Nếu lấy dưới dạng vector thì không bị lỗi
bsVND$itemName
## [1] "T<U+1ED4>NG C<U+1ED8>NG TÀI S<U+1EA2>N"
## [2] "Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n"
## [3] "Tài s<U+1EA3>n tài chính ng<U+1EAF>n h<U+1EA1>n"
## [4] "Ti<U+1EC1>n và các kho<U+1EA3>n tuong duong ti<U+1EC1>n"
## [5] "Ti<U+1EC1>n"
## [6] "Các kho<U+1EA3>n tuong duong ti<U+1EC1>n"
## [7] "Các kho<U+1EA3>n d<U+1EA7>u tu tài chính ng<U+1EAF>n h<U+1EA1>n"
## [8] "Ð<U+1EA7>u tu ng<U+1EAF>n h<U+1EA1>n"
## [9] "Các kho<U+1EA3>n tài chính s<U+1EB5>n sàng d<U+1EC3> bán (AFS)"
## [10] "Ð<U+1EA7>u tu gi<U+1EEF> d<U+1EBF>n ngày dáo h<U+1EA1>n"
## [11] "Các kho<U+1EA3>n cho vay"
## [12] "D<U+1EF1> phòng gi<U+1EA3>m giá d<U+1EA7>u tu ng<U+1EAF>n h<U+1EA1>n"
## [13] "Các kho<U+1EA3>n ph<U+1EA3>i thu ng<U+1EAF>n h<U+1EA1>n"
## [14] "Các kho<U+1EA3>n ph<U+1EA3>i thu (t<U+1EEB> 2016)"
## [15] "Ph<U+1EA3>i thu khách hàng"
## [16] "Tr<U+1EA3> tru<U+1EDB>c cho ngu<U+1EDD>i bán"
## [17] "Ph<U+1EA3>i thu n<U+1ED9>i b<U+1ED9> ng<U+1EAF>n h<U+1EA1>n"
## [18] "Ph<U+1EA3>i thu v<U+1EC1> l<U+1ED7>i giao d<U+1ECB>ch CK"
## [19] "Ph<U+1EA3>i thu ho<U+1EA1>t d<U+1ED9>ng giao d<U+1ECB>ch ch<U+1EE9>ng khoán"
## [20] "Ph<U+1EA3>i thu theo ti<U+1EBF>n d<U+1ED9> k<U+1EBF> ho<U+1EA1>ch h<U+1EE3>p d<U+1ED3>ng xây d<U+1EF1>ng"
## [21] "Ph<U+1EA3>i thu v<U+1EC1> cho vay ng<U+1EAF>n h<U+1EA1>n"
## [22] "D<U+1EF1> phòng suy gi<U+1EA3>m giá tr<U+1ECB> các kho<U+1EA3>n ph<U+1EA3>i thu"
## [23] "Các kho<U+1EA3>n ph<U+1EA3>i thu khác"
## [24] "D<U+1EF1> phòng ph<U+1EA3>i thu ng<U+1EAF>n h<U+1EA1>n khó dòi"
## [25] "Tài s<U+1EA3>n thi<U+1EBF>u ch<U+1EDD> x<U+1EED> lý"
## [26] "Hàng t<U+1ED3>n kho"
## [27] "Hàng t<U+1ED3>n kho"
## [28] "D<U+1EF1> phòng gi<U+1EA3>m giá hàng t<U+1ED3>n kho"
## [29] "Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n khác"
## [30] "T<U+1EA1>m <U+1EE9>ng"
## [31] "V<U+1EAD>t tu van phòng, công c<U+1EE5>, d<U+1EE5>ng c<U+1EE5>"
## [32] "Chi phí tr<U+1EA3> tru<U+1EDB>c ng<U+1EAF>n h<U+1EA1>n"
## [33] "Tài s<U+1EA3>n c<U+1EA7>m c<U+1ED1>, ký cu<U+1EE3>c, ký qu<U+1EF9> ng<U+1EAF>n h<U+1EA1>n"
## [34] "Thu<U+1EBF> GTGT du<U+1EE3>c kh<U+1EA5>u tr<U+1EEB>"
## [35] "Ph<U+1EA3>i thu các d<U+1ECB>ch v<U+1EE5> CTCK cung c<U+1EA5>p"
## [36] "Thu<U+1EBF> và các kho<U+1EA3>n khác ph<U+1EA3>i thu Nhà nu<U+1EDB>c"
## [37] "Giao d<U+1ECB>ch mua bán l<U+1EA1>i trái phi<U+1EBF>u chính ph<U+1EE7>"
## [38] "Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n khác"
## [39] "D<U+1EF1> phòng suy gi<U+1EA3>m giá tr<U+1ECB> TSNH khác"
## [40] "Tài s<U+1EA3>n dài h<U+1EA1>n"
## [41] "Tài s<U+1EA3>n tài chính dài h<U+1EA1>n"
## [42] "Các kho<U+1EA3>n ph<U+1EA3>i thu dài h<U+1EA1>n"
## [43] "Ph<U+1EA3>i thu dài h<U+1EA1>n c<U+1EE7>a khách hàng"
## [44] "Tr<U+1EA3> tru<U+1EDB>c dài h<U+1EA1>n ngu<U+1EDD>i bán"
## [45] "V<U+1ED1>n kinh doanh <U+1EDF> don v<U+1ECB> tr<U+1EF1>c thu<U+1ED9>c"
## [46] "Ph<U+1EA3>i thu dài h<U+1EA1>n n<U+1ED9>i b<U+1ED9>"
## [47] "Ph<U+1EA3>i thu v<U+1EC1> cho vay dài h<U+1EA1>n"
## [48] "Ph<U+1EA3>i thu dài h<U+1EA1>n khác"
## [49] "D<U+1EF1> phòng ph<U+1EA3>i thu dài h<U+1EA1>n khó dòi"
## [50] "Các kho<U+1EA3>n d<U+1EA7>u tu tài chính dài h<U+1EA1>n"
## [51] "Ð<U+1EA7>u tu vào công ty con"
## [52] "Ð<U+1EA7>u tu vào công ty liên k<U+1EBF>t, liên doanh"
## [53] "Ð<U+1EA7>u tu ch<U+1EE9>ng khoán dài h<U+1EA1>n"
## [54] "Ð<U+1EA7>u tu dài h<U+1EA1>n khác"
## [55] "D<U+1EF1> phòng gi<U+1EA3>m giá d<U+1EA7>u tu tài chính dài h<U+1EA1>n"
## [56] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh"
## [57] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh h<U+1EEF>u hình"
## [58] "Nguyên giá"
## [59] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [60] "Ðánh giá TSCÐHH theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [61] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh thuê tài chính"
## [62] "Nguyên giá"
## [63] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [64] "Ðánh giá TSCÐTTC theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [65] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh vô hình"
## [66] "Nguyên giá"
## [67] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [68] "Ðánh giá TSCÐVH theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [69] "Chi phí xây d<U+1EF1>ng co b<U+1EA3>n d<U+1EDF> dang (tru<U+1EDB>c 2015)"
## [70] "B<U+1EA5>t d<U+1ED9>ng s<U+1EA3>n d<U+1EA7>u tu"
## [71] "Nguyên giá"
## [72] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [73] "Ðánh giá BÐSÐT theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [74] "Tài s<U+1EA3>n d<U+1EDF> dang dài h<U+1EA1>n"
## [75] "Chi phí s<U+1EA3>n xu<U+1EA5>t, kinh doanh d<U+1EDF> dang dài h<U+1EA1>n"
## [76] "Chi phí xây d<U+1EF1>ng co b<U+1EA3>n d<U+1EDF> dang"
## [77] "Tài s<U+1EA3>n dài h<U+1EA1>n khác"
## [78] "C<U+1EA7>m c<U+1ED1>, ký qu<U+1EF9>, ký cu<U+1EE3>c dài h<U+1EA1>n khác"
## [79] "Chi phí tr<U+1EA3> tru<U+1EDB>c dài h<U+1EA1>n"
## [80] "Tài s<U+1EA3>n thu<U+1EBF> thu nh<U+1EAD>p hoãn l<U+1EA1>i"
## [81] "Thi<U+1EBF>t b<U+1ECB>, v<U+1EAD>t tu, ph<U+1EE5> tùng thay th<U+1EBF> dài h<U+1EA1>n"
## [82] "Ti<U+1EC1>n n<U+1ED9>p Qu<U+1EF9> h<U+1ED7> tr<U+1EE3> thanh toán"
## [83] "Tài s<U+1EA3>n dài h<U+1EA1>n khác"
#Nếu xem dưới dạng data.frame sẽ gặp lỗi
bsVND[1:5,]
## symBols itemName Q1.2017.
## 2 VND T<U+1ED4>NG C<U+1ED8>NG TÀI S<U+1EA2>N 6468974
## 3 VND Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n 6333968
## 4 VND Tài s<U+1EA3>n tài chính ng<U+1EAF>n h<U+1EA1>n 6318971
## 5 VND Ti<U+1EC1>n và các kho<U+1EA3>n tuong duong ti<U+1EC1>n 196776
## 6 VND Ti<U+1EC1>n 109776
## Q4.2016. Q3.2016. Q2.2016. Q1.2016.
## 2 5172709 4931394 5009411 4233588
## 3 5050634 4809951 4885702 4132074
## 4 4951687 4698098 4786501 4120831
## 5 256959 65721 311946 1137266
## 6 173959 65721 61946 428066
#Do đó cách tốt hơn là chuyển dữ liệu của bạn sang dạng list
bsVND %>% as.list()
## $symBols
## [1] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [12] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [23] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [34] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [45] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [56] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [67] "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND" "VND"
## [78] "VND" "VND" "VND" "VND" "VND" "VND"
##
## $itemName
## [1] "T<U+1ED4>NG C<U+1ED8>NG TÀI S<U+1EA2>N"
## [2] "Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n"
## [3] "Tài s<U+1EA3>n tài chính ng<U+1EAF>n h<U+1EA1>n"
## [4] "Ti<U+1EC1>n và các kho<U+1EA3>n tuong duong ti<U+1EC1>n"
## [5] "Ti<U+1EC1>n"
## [6] "Các kho<U+1EA3>n tuong duong ti<U+1EC1>n"
## [7] "Các kho<U+1EA3>n d<U+1EA7>u tu tài chính ng<U+1EAF>n h<U+1EA1>n"
## [8] "Ð<U+1EA7>u tu ng<U+1EAF>n h<U+1EA1>n"
## [9] "Các kho<U+1EA3>n tài chính s<U+1EB5>n sàng d<U+1EC3> bán (AFS)"
## [10] "Ð<U+1EA7>u tu gi<U+1EEF> d<U+1EBF>n ngày dáo h<U+1EA1>n"
## [11] "Các kho<U+1EA3>n cho vay"
## [12] "D<U+1EF1> phòng gi<U+1EA3>m giá d<U+1EA7>u tu ng<U+1EAF>n h<U+1EA1>n"
## [13] "Các kho<U+1EA3>n ph<U+1EA3>i thu ng<U+1EAF>n h<U+1EA1>n"
## [14] "Các kho<U+1EA3>n ph<U+1EA3>i thu (t<U+1EEB> 2016)"
## [15] "Ph<U+1EA3>i thu khách hàng"
## [16] "Tr<U+1EA3> tru<U+1EDB>c cho ngu<U+1EDD>i bán"
## [17] "Ph<U+1EA3>i thu n<U+1ED9>i b<U+1ED9> ng<U+1EAF>n h<U+1EA1>n"
## [18] "Ph<U+1EA3>i thu v<U+1EC1> l<U+1ED7>i giao d<U+1ECB>ch CK"
## [19] "Ph<U+1EA3>i thu ho<U+1EA1>t d<U+1ED9>ng giao d<U+1ECB>ch ch<U+1EE9>ng khoán"
## [20] "Ph<U+1EA3>i thu theo ti<U+1EBF>n d<U+1ED9> k<U+1EBF> ho<U+1EA1>ch h<U+1EE3>p d<U+1ED3>ng xây d<U+1EF1>ng"
## [21] "Ph<U+1EA3>i thu v<U+1EC1> cho vay ng<U+1EAF>n h<U+1EA1>n"
## [22] "D<U+1EF1> phòng suy gi<U+1EA3>m giá tr<U+1ECB> các kho<U+1EA3>n ph<U+1EA3>i thu"
## [23] "Các kho<U+1EA3>n ph<U+1EA3>i thu khác"
## [24] "D<U+1EF1> phòng ph<U+1EA3>i thu ng<U+1EAF>n h<U+1EA1>n khó dòi"
## [25] "Tài s<U+1EA3>n thi<U+1EBF>u ch<U+1EDD> x<U+1EED> lý"
## [26] "Hàng t<U+1ED3>n kho"
## [27] "Hàng t<U+1ED3>n kho"
## [28] "D<U+1EF1> phòng gi<U+1EA3>m giá hàng t<U+1ED3>n kho"
## [29] "Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n khác"
## [30] "T<U+1EA1>m <U+1EE9>ng"
## [31] "V<U+1EAD>t tu van phòng, công c<U+1EE5>, d<U+1EE5>ng c<U+1EE5>"
## [32] "Chi phí tr<U+1EA3> tru<U+1EDB>c ng<U+1EAF>n h<U+1EA1>n"
## [33] "Tài s<U+1EA3>n c<U+1EA7>m c<U+1ED1>, ký cu<U+1EE3>c, ký qu<U+1EF9> ng<U+1EAF>n h<U+1EA1>n"
## [34] "Thu<U+1EBF> GTGT du<U+1EE3>c kh<U+1EA5>u tr<U+1EEB>"
## [35] "Ph<U+1EA3>i thu các d<U+1ECB>ch v<U+1EE5> CTCK cung c<U+1EA5>p"
## [36] "Thu<U+1EBF> và các kho<U+1EA3>n khác ph<U+1EA3>i thu Nhà nu<U+1EDB>c"
## [37] "Giao d<U+1ECB>ch mua bán l<U+1EA1>i trái phi<U+1EBF>u chính ph<U+1EE7>"
## [38] "Tài s<U+1EA3>n ng<U+1EAF>n h<U+1EA1>n khác"
## [39] "D<U+1EF1> phòng suy gi<U+1EA3>m giá tr<U+1ECB> TSNH khác"
## [40] "Tài s<U+1EA3>n dài h<U+1EA1>n"
## [41] "Tài s<U+1EA3>n tài chính dài h<U+1EA1>n"
## [42] "Các kho<U+1EA3>n ph<U+1EA3>i thu dài h<U+1EA1>n"
## [43] "Ph<U+1EA3>i thu dài h<U+1EA1>n c<U+1EE7>a khách hàng"
## [44] "Tr<U+1EA3> tru<U+1EDB>c dài h<U+1EA1>n ngu<U+1EDD>i bán"
## [45] "V<U+1ED1>n kinh doanh <U+1EDF> don v<U+1ECB> tr<U+1EF1>c thu<U+1ED9>c"
## [46] "Ph<U+1EA3>i thu dài h<U+1EA1>n n<U+1ED9>i b<U+1ED9>"
## [47] "Ph<U+1EA3>i thu v<U+1EC1> cho vay dài h<U+1EA1>n"
## [48] "Ph<U+1EA3>i thu dài h<U+1EA1>n khác"
## [49] "D<U+1EF1> phòng ph<U+1EA3>i thu dài h<U+1EA1>n khó dòi"
## [50] "Các kho<U+1EA3>n d<U+1EA7>u tu tài chính dài h<U+1EA1>n"
## [51] "Ð<U+1EA7>u tu vào công ty con"
## [52] "Ð<U+1EA7>u tu vào công ty liên k<U+1EBF>t, liên doanh"
## [53] "Ð<U+1EA7>u tu ch<U+1EE9>ng khoán dài h<U+1EA1>n"
## [54] "Ð<U+1EA7>u tu dài h<U+1EA1>n khác"
## [55] "D<U+1EF1> phòng gi<U+1EA3>m giá d<U+1EA7>u tu tài chính dài h<U+1EA1>n"
## [56] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh"
## [57] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh h<U+1EEF>u hình"
## [58] "Nguyên giá"
## [59] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [60] "Ðánh giá TSCÐHH theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [61] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh thuê tài chính"
## [62] "Nguyên giá"
## [63] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [64] "Ðánh giá TSCÐTTC theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [65] "Tài s<U+1EA3>n c<U+1ED1> d<U+1ECB>nh vô hình"
## [66] "Nguyên giá"
## [67] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [68] "Ðánh giá TSCÐVH theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [69] "Chi phí xây d<U+1EF1>ng co b<U+1EA3>n d<U+1EDF> dang (tru<U+1EDB>c 2015)"
## [70] "B<U+1EA5>t d<U+1ED9>ng s<U+1EA3>n d<U+1EA7>u tu"
## [71] "Nguyên giá"
## [72] "Giá tr<U+1ECB> hao mòn lu<U+1EF9> k<U+1EBF>"
## [73] "Ðánh giá BÐSÐT theo giá tr<U+1ECB> h<U+1EE3>p lý"
## [74] "Tài s<U+1EA3>n d<U+1EDF> dang dài h<U+1EA1>n"
## [75] "Chi phí s<U+1EA3>n xu<U+1EA5>t, kinh doanh d<U+1EDF> dang dài h<U+1EA1>n"
## [76] "Chi phí xây d<U+1EF1>ng co b<U+1EA3>n d<U+1EDF> dang"
## [77] "Tài s<U+1EA3>n dài h<U+1EA1>n khác"
## [78] "C<U+1EA7>m c<U+1ED1>, ký qu<U+1EF9>, ký cu<U+1EE3>c dài h<U+1EA1>n khác"
## [79] "Chi phí tr<U+1EA3> tru<U+1EDB>c dài h<U+1EA1>n"
## [80] "Tài s<U+1EA3>n thu<U+1EBF> thu nh<U+1EAD>p hoãn l<U+1EA1>i"
## [81] "Thi<U+1EBF>t b<U+1ECB>, v<U+1EAD>t tu, ph<U+1EE5> tùng thay th<U+1EBF> dài h<U+1EA1>n"
## [82] "Ti<U+1EC1>n n<U+1ED9>p Qu<U+1EF9> h<U+1ED7> tr<U+1EE3> thanh toán"
## [83] "Tài s<U+1EA3>n dài h<U+1EA1>n khác"
##
## $Q1.2017.
## [1] 6468974 6333968 6318971 196776 109776 87000 6063723 3828662
## [9] 76512 0 2347628 -189079 58472 55388 0 1311
## [17] 0 0 0 0 0 -4072 3699 0
## [25] 0 0 0 0 14996 4936 0 8724
## [33] 1326 0 2146 0 0 0 0 135006
## [41] 0 0 0 0 0 0 0 0
## [49] 0 0 0 0 0 0 0 60836
## [57] 38995 94569 -55574 0 0 0 0 0
## [65] 21841 67579 -45737 0 0 0 0 0
## [73] 0 2500 0 2500 71670 0 6189 0
## [81] 0 20000 30077
##
## $Q4.2016.
## [1] 5172709 5050634 4951687 256959 173959 0 4621317 2861343
## [9] 9500 0 1939769 -189296 73412 10056 0 0
## [17] 0 0 0 0 0 -4072 67428 0
## [25] 0 0 0 0 98947 2776 0 5836
## [33] 1316 0 0 0 0 89020 0 122074
## [41] 0 0 0 0 0 0 0 0
## [49] 0 0 0 0 0 0 0 64172
## [57] 40859 94047 -53188 0 0 0 0 0
## [65] 23313 66725 -43412 0 0 0 0 0
## [73] 0 2500 0 2500 55402 0 7144 0
## [81] 0 18258 30000
##
## $Q3.2016.
## [1] 4931394 4809951 4698098 65721 65721 83000 4569907 2631502
## [9] 25748 0 2096233 -183577 62471 23579 0 0
## [17] 0 0 0 0 0 -3522 42414 0
## [25] 0 0 0 0 111852 9638 0 8341
## [33] 1316 0 0 0 0 92557 0 121443
## [41] 0 0 0 0 0 0 0 0
## [49] 0 0 0 0 0 0 0 64957
## [57] 40034 90927 -50893 0 0 0 0 0
## [65] 24922 66102 -41180 0 0 0 0 0
## [73] 0 619 0 619 55867 0 7609 0
## [81] 0 18258 30000
##
## $Q2.2016.
## [1] 5009411 4885702 4786501 311946 61946 0 4415233 2902793
## [9] 204939 0 1489162 -181661 59321 59080 0 0
## [17] 0 0 0 0 0 -3522 3763 0
## [25] 0 0 0 0 99201 2837 0 4481
## [33] 1316 0 0 0 0 90568 0 123709
## [41] 0 0 0 0 0 0 0 0
## [49] 0 0 0 0 0 0 0 65361
## [57] 41397 90067 -48670 0 0 0 0 0
## [65] 23965 62734 -38770 0 0 0 0 0
## [73] 0 2458 0 2458 55891 0 7633 0
## [81] 0 18258 30000
##
## $Q1.2016.
## [1] 4233588 4132074 4120831 1137266 428066 250000 1423143 1177791
## [9] 372573 18248 0 -145470 1560423 5768 0 0
## [17] 0 0 0 0 0 -79260 3924 0
## [25] 0 0 0 0 11243 2725 0 7222
## [33] 1295 0 1629990 0 0 0 0 101514
## [41] 7500 0 0 0 0 0 0 0
## [49] 0 7500 0 7500 0 0 0 68098
## [57] 42593 89099 -46506 0 0 0 0 0
## [65] 25505 61777 -36271 0 0 0 0 0
## [73] 0 543 0 543 25372 0 7115 0
## [81] 0 18258 0