Trên thế giới, để đo lường các đối tượng kế toán, giá gốc là loại giá xuất hiện đầu tiên cùng
với sự xuất hiện của kế toán. Tuy nhiên qua thời gian thì mô hình giá gốc bộc lộ những
nhược điểm ví dụ như: là giá quá khứ, không cho phép ghi nhận lãi chưa thực hiện. Vì vậy
GTHL xuất hiện để khắc phục những nhược điểm của giá gốc. GTHL được áp dụng lần đầu
tiên trên thế giới từ những năm 1970 ở Hoa Kỳ. Đến ngày nay nó được sự thừa nhận, áp
dụng rộng rãi ở 133 quốc gia (theo Ủy ban chuẩn mực kế toán quốc tế - IASB năm 2015), và
đã có khung pháp lý vững chắc: chuẩn mực về đo lường GTHL (IFRS 13), là một loại giá để
đo lường được đề cập trong khuôn mẫu lý thuyết (dự thảo) của Ủy ban chuẩn mực kế toán
quốc tế.
GTHL của các tài sản/nợ phải trả là giá hiện tại (đo lường tại thời điểm lập báo cáo) được
ước tính dựa vào thị trường hoặc ước tính dựa vào chiết khấu dòng thu nhập tương lai hoặc
chi phí để có được tài sản. Trong khi đó, giá gốc của tài sản trình bày trên báo cáo tài chính
là giá tại thời điểm mua trừ đi các khoản hao mòn (nếu có) và trừ đi các khoản tổn thất (nếu
có), giá gốc của nợ phải trả trình bày trên báo cáo tài chính là giá trị tính theo nguyên giá
phân bổ.
358 trang |
Chia sẻ: tueminh09 | Ngày: 08/02/2022 | Lượt xem: 388 | Lượt tải: 0
Bạn đang xem trước 20 trang tài liệu Luận án Định hướng về việc áp dụng giá trị hợp lý trong kế toán Việt Nam, để xem tài liệu hoàn chỉnh bạn click vào nút DOWNLOAD ở trên
ia 0.21572 0.07833 2.754 0.00670 **
TSVH.bao.toan.von 0.42830 0.07238 5.918 2.55e-08 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.6532 on 135 degrees of freedom
Multiple R-squared: 0.6983, Adjusted R-squared: 0.6916
F-statistic: 104.2 on 3 and 135 DF, p-value: < 2.2e-16
161ii
>
hqthichhopNDTTSTC=lm(TSTC.thich.hop~TSTC.gia.hien.tai+TSTC.su.thay.doi.gia
+TSTC.bao.toan.von, data=MauNDT)
> summary(hqthichhopNDTTSTC)
Call:
lm(formula = TSTC.thich.hop ~ TSTC.gia.hien.tai + TSTC.su.thay.doi.gia +
TSTC.bao.toan.von, data = MauNDT)
Residuals:
Min 1Q Median 3Q Max
-2.31961 -0.08547 0.01040 0.04717 1.41870
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.13668 0.17321 0.789 0.4309
TSTC.gia.hien.tai 0.45905 0.05091 9.018 < 2e-16 ***
TSTC.su.thay.doi.gia 0.09587 0.04377 2.191 0.0296 *
TSTC.bao.toan.von 0.40831 0.04708 8.673 9.98e-16 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.5617 on 217 degrees of freedom
Multiple R-squared: 0.7012, Adjusted R-squared: 0.6971
F-statistic: 169.7 on 3 and 217 DF, p-value: < 2.2e-16
>
hqthichhopDNTSTC=lm(TSTC.thich.hop~TSTC.gia.hien.tai+TSTC.su.thay.doi.gia+
TSTC.bao.toan.von, data=MauDN)
> summary(hqthichhopDNTSTC)
Call:
lm(formula = TSTC.thich.hop ~ TSTC.gia.hien.tai + TSTC.su.thay.doi.gia +
TSTC.bao.toan.von, data = MauDN)
Residuals:
Min 1Q Median 3Q Max
-2.27877 -0.03224 0.05755 0.05755 1.87797
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.16693 0.16596 1.006 0.3163
TSTC.gia.hien.tai 0.35356 0.08236 4.293 3.35e-05 ***
TSTC.su.thay.doi.gia 0.41592 0.06770 6.144 8.48e-09 ***
TSTC.bao.toan.von 0.18562 0.08172 2.272 0.0247 *
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.4969 on 135 degrees of freedom
Multiple R-squared: 0.8201, Adjusted R-squared: 0.8161
F-statistic: 205.1 on 3 and 135 DF, p-value: < 2.2e-16
> t.test(BDSDT.dang.tin.cay~Doi.tuong, data=Mau)
162ii
Welch Two Sample t-test
data: BDSDT.dang.tin.cay by Doi.tuong
t = -0.95567, df = 247.92, p-value = 0.3402
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.3511432 0.1217087
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
3.251799 3.366516
> wilcox.test(BDSDT.dang.tin.cay ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: BDSDT.dang.tin.cay by Doi.tuong
W = 14416, p-value = 0.3084
alternative hypothesis: true location shift is not equal to 0
> t.test(TSCDHH..dang.tin.cay~Doi.tuong, data=Mau)
Welch Two Sample t-test
data: TSCDHH..dang.tin.cay by Doi.tuong
t = 0.88468, df = 254.45, p-value = 0.3772
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.1361768 0.3583194
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
3.323741 3.212670
> wilcox.test(TSCDHH..dang.tin.cay ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: TSCDHH..dang.tin.cay by Doi.tuong
W = 16304, p-value = 0.3103
alternative hypothesis: true location shift is not equal to 0
> t.test(TSVH.dang.tin.cay~Doi.tuong, data=Mau)
Welch Two Sample t-test
data: TSVH.dang.tin.cay by Doi.tuong
t = 0.53126, df = 265.53, p-value = 0.5957
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.1770701 0.3079337
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
2.956835 2.891403
163ii
> wilcox.test(TSVH.dang.tin.cay ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: TSVH.dang.tin.cay by Doi.tuong
W = 15620, p-value = 0.7787
alternative hypothesis: true location shift is not equal to 0
> t.test(TSTC.dang.tin.cay~Doi.tuong, data=Mau)
Welch Two Sample t-test
data: TSTC.dang.tin.cay by Doi.tuong
t = 1.7711, df = 264.88, p-value = 0.0777
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.02213814 0.41837500
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
3.582734 3.384615
> wilcox.test(TSTC.dang.tin.cay ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: TSTC.dang.tin.cay by Doi.tuong
W = 17086, p-value = 0.06049
alternative hypothesis: true location shift is not equal to 0
> sosanhdangtincay=aov(Dang..tin.cay~Khoan.muc,data=Khoanmuc)
> summary(sosanhdangtincay)
Df Sum Sq Mean Sq F value Pr(>F)
Khoan.muc 3 57.8 19.252 16.8 1e-10 ***
Residuals 1436 1646.1 1.146
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> TukeyHSD(sosanhdangtincay)
Tukey multiple comparisons of means
95% family-wise confidence level
Fit: aov(formula = Dang..tin.cay ~ Khoan.muc, data = Khoanmuc)
$Khoan.muc
diff lwr upr p adj
TSCDHH-BDSDT -0.06666667 -0.2719190969 0.1385858 0.8376097
TSTC-BDSDT 0.13888889 -0.0663635414 0.3441413 0.3030817
TSVH-BDSDT -0.40555556 -0.6108079858 -0.2003031 0.0000025
TSTC-TSCDHH 0.20555556 0.0003031253 0.4108080 0.0494998
TSVH-TSCDHH -0.33888889 -0.5441413191 -0.1336365 0.0001356
TSVH-TSTC -0.54444444 -0.7496968747 -0.3391920 0.0000000
> sosanhdangtincay2=aov(Dang..tin.cay~Khoan.muc+Doi.tuong, data=Khoanmuc)
> summary(sosanhdangtincay2)
Df Sum Sq Mean Sq F value Pr(>F)
164ii
Khoan.muc 3 57.8 19.252 16.798 9.98e-11 ***
Doi.tuong 1 1.4 1.441 1.257 0.262
Residuals 1435 1644.6 1.146
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
>
hqdantincayNDTBDSDT=lm(BDSDT.dang.tin.cay~BDSDT.co.thong.tin+BDSDT.co.nhan
.su+BDSDT.pp.khong.phuc.tap+BDSDT.khong.co.dong.co+BDSDT.e.ngai.nha.dau.tu
+BDSDT.cac.rao.can, data=MauNDT)
> summary(hqdantincayNDTBDSDT)
Call:
lm(formula = BDSDT.dang.tin.cay ~ BDSDT.co.thong.tin + BDSDT.co.nhan.su +
BDSDT.pp.khong.phuc.tap + BDSDT.khong.co.dong.co +
BDSDT.e.ngai.nha.dau.tu +
BDSDT.cac.rao.can, data = MauNDT)
Residuals:
Min 1Q Median 3Q Max
-2.00418 -0.43928 0.01622 0.43903 2.48677
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 1.01878 0.20717 4.918 1.74e-06 ***
BDSDT.co.thong.tin 0.09519 0.06069 1.568 0.118248
BDSDT.co.nhan.su 0.21360 0.06130 3.484 0.000598 ***
BDSDT.pp.khong.phuc.tap -0.03212 0.05833 -0.551 0.582466
BDSDT.khong.co.dong.co -0.10252 0.06123 -1.674 0.095538 .
BDSDT.e.ngai.nha.dau.tu 0.24922 0.06587 3.783 0.000201 ***
BDSDT.cac.rao.can 0.32385 0.06060 5.344 2.32e-07 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.7388 on 214 degrees of freedom
Multiple R-squared: 0.4255, Adjusted R-squared: 0.4094
F-statistic: 26.42 on 6 and 214 DF, p-value: < 2.2e-16
>
hqdantincayDNBDSDT=lm(BDSDT.dang.tin.cay~BDSDT.co.thong.tin+BDSDT.co.nhan.
su+BDSDT.pp.khong.phuc.tap+BDSDT.khong.co.dong.co+BDSDT.e.ngai.nha.dau.tu+
BDSDT.cac.rao.can, data=MauDN)
> summary(hqdantincayDNBDSDT)
Call:
lm(formula = BDSDT.dang.tin.cay ~ BDSDT.co.thong.tin + BDSDT.co.nhan.su +
BDSDT.pp.khong.phuc.tap + BDSDT.khong.co.dong.co +
BDSDT.e.ngai.nha.dau.tu +
BDSDT.cac.rao.can, data = MauDN)
Residuals:
Min 1Q Median 3Q Max
-2.73313 -0.62945 0.05675 0.61282 2.94418
Coefficients:
165ii
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.79760 0.28713 2.778 0.006270 **
BDSDT.co.thong.tin -0.04099 0.08471 -0.484 0.629309
BDSDT.co.nhan.su 0.32746 0.08945 3.661 0.000363 ***
BDSDT.pp.khong.phuc.tap 0.20044 0.07047 2.844 0.005160 **
BDSDT.khong.co.dong.co 0.11049 0.08510 1.298 0.196442
BDSDT.e.ngai.nha.dau.tu 0.04795 0.10324 0.464 0.643072
BDSDT.cac.rao.can 0.17094 0.10634 1.607 0.110348
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.9537 on 132 degrees of freedom
Multiple R-squared: 0.388, Adjusted R-squared: 0.3602
F-statistic: 13.95 on 6 and 132 DF, p-value: 3.037e-12
>
hqdantincayNDTTSCDHH=lm(TSCDHH..dang.tin.cay~TSCDHH.co.thong.tin+TSCDHH.co
.nhan.su+TSCDHH.pp.khong.phuc.tap+TSCDHH.khong.co.dong.co+TSCDHH.e.ngai.nh
a.dau.tu+TSCDHH.cac.rao.can, data=MauNDT)
> summary(hqdantincayNDTTSCDHH)
Call:
lm(formula = TSCDHH..dang.tin.cay ~ TSCDHH.co.thong.tin +
TSCDHH.co.nhan.su +
TSCDHH.pp.khong.phuc.tap + TSCDHH.khong.co.dong.co +
TSCDHH.e.ngai.nha.dau.tu +
TSCDHH.cac.rao.can, data = MauNDT)
Residuals:
Min 1Q Median 3Q Max
-2.6924 -0.4823 0.0075 0.4739 2.2804
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.87825 0.20659 4.251 3.18e-05 ***
TSCDHH.co.thong.tin 0.05260 0.06796 0.774 0.440
TSCDHH.co.nhan.su 0.32355 0.07668 4.219 3.62e-05 ***
TSCDHH.pp.khong.phuc.tap 0.02159 0.06781 0.318 0.751
TSCDHH.khong.co.dong.co 0.12845 0.08650 1.485 0.139
TSCDHH.e.ngai.nha.dau.tu 0.13420 0.09634 1.393 0.165
TSCDHH.cac.rao.can 0.11817 0.07633 1.548 0.123
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.8096 on 214 degrees of freedom
Multiple R-squared: 0.398, Adjusted R-squared: 0.3811
F-statistic: 23.58 on 6 and 214 DF, p-value: < 2.2e-16
>
hqdantincayDNTSCDHH=lm(TSCDHH..dang.tin.cay~TSCDHH.co.thong.tin+TSCDHH.co.
nhan.su+TSCDHH.pp.khong.phuc.tap+TSCDHH.khong.co.dong.co+TSCDHH.e.ngai.nha
.dau.tu+TSCDHH.cac.rao.can, data=MauDN)
> summary(hqdantincayDNTSCDHH)
166ii
Call:
lm(formula = TSCDHH..dang.tin.cay ~ TSCDHH.co.thong.tin +
TSCDHH.co.nhan.su +
TSCDHH.pp.khong.phuc.tap + TSCDHH.khong.co.dong.co +
TSCDHH.e.ngai.nha.dau.tu +
TSCDHH.cac.rao.can, data = MauDN)
Residuals:
Min 1Q Median 3Q Max
-2.66884 -0.53448 -0.03384 0.53047 2.47713
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.80394 0.28931 2.779 0.00625 **
TSCDHH.co.thong.tin 0.07047 0.08872 0.794 0.42848
TSCDHH.co.nhan.su 0.20844 0.09141 2.280 0.02420 *
TSCDHH.pp.khong.phuc.tap 0.25411 0.08341 3.047 0.00280 **
TSCDHH.khong.co.dong.co 0.24771 0.09930 2.495 0.01385 *
TSCDHH.e.ngai.nha.dau.tu 0.21887 0.10310 2.123 0.03563 *
TSCDHH.cac.rao.can -0.15115 0.10327 -1.464 0.14566
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.9575 on 132 degrees of freedom
Multiple R-squared: 0.4249, Adjusted R-squared: 0.3987
F-statistic: 16.25 on 6 and 132 DF, p-value: 5.962e-14
>
hqdantincayNDTTSVH=lm(TSVH.dang.tin.cay~TSVH.co.thong.tin+TSVH.co.nhan.su+
TSVH.pp.khong.phuc.tap+TSVH.khong.co.dong.co+TSVH.e.ngai.nha.dau.tu+TSVH.c
ac.rao.can, data=MauNDT)
> summary(hqdantincayNDTTSVH)
Call:
lm(formula = TSVH.dang.tin.cay ~ TSVH.co.thong.tin + TSVH.co.nhan.su +
TSVH.pp.khong.phuc.tap + TSVH.khong.co.dong.co +
TSVH.e.ngai.nha.dau.tu +
TSVH.cac.rao.can, data = MauNDT)
Residuals:
Min 1Q Median 3Q Max
-1.7107 -0.4246 -0.1110 0.5014 3.5754
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.56166 0.19094 2.942 0.003624 **
TSVH.co.thong.tin 0.07159 0.05290 1.353 0.177363
TSVH.co.nhan.su 0.26673 0.07329 3.639 0.000343 ***
TSVH.pp.khong.phuc.tap 0.17655 0.06653 2.654 0.008556 **
TSVH.khong.co.dong.co 0.15955 0.08408 1.898 0.059104 .
TSVH.e.ngai.nha.dau.tu -0.03141 0.08914 -0.352 0.724910
TSVH.cac.rao.can 0.21993 0.09104 2.416 0.016542 *
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
167ii
Residual standard error: 0.7941 on 214 degrees of freedom
Multiple R-squared: 0.4409, Adjusted R-squared: 0.4253
F-statistic: 28.13 on 6 and 214 DF, p-value: < 2.2e-16
>
hqdantincayDNTSVH=lm(TSVH.dang.tin.cay~TSVH.co.thong.tin+TSVH.co.nhan.su+T
SVH.pp.khong.phuc.tap+TSVH.khong.co.dong.co+TSVH.e.ngai.nha.dau.tu+TSVH.ca
c.rao.can, data=MauDN)
> summary(hqdantincayDNTSVH)
Call:
lm(formula = TSVH.dang.tin.cay ~ TSVH.co.thong.tin + TSVH.co.nhan.su +
TSVH.pp.khong.phuc.tap + TSVH.khong.co.dong.co +
TSVH.e.ngai.nha.dau.tu +
TSVH.cac.rao.can, data = MauDN)
Residuals:
Min 1Q Median 3Q Max
-2.24352 -0.50695 -0.01857 0.43938 2.96049
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.60294 0.24116 2.500 0.01364 *
TSVH.co.thong.tin 0.12330 0.10102 1.221 0.22442
TSVH.co.nhan.su 0.13251 0.10990 1.206 0.23009
TSVH.pp.khong.phuc.tap 0.28364 0.08918 3.181 0.00183 **
TSVH.khong.co.dong.co 0.11254 0.12692 0.887 0.37684
TSVH.e.ngai.nha.dau.tu 0.08547 0.14274 0.599 0.55036
TSVH.cac.rao.can 0.11645 0.10477 1.111 0.26841
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.8798 on 132 degrees of freedom
Multiple R-squared: 0.478, Adjusted R-squared: 0.4543
F-statistic: 20.14 on 6 and 132 DF, p-value: < 2.2e-16
>
hqdantincayNDTTSTC=lm(TSTC.dang.tin.cay~TSTC.co.thong.tin+TSTC.co.nhan.su+
TSTC.pp.khong.phuc.tap+TSTC.khong.co.dong.co+TSTC.e.ngai.nha.dau.tu+TSTC.c
ac.rao.can, data=MauNDT)
> summary(hqdantincayNDTTSTC)
Call:
lm(formula = TSTC.dang.tin.cay ~ TSTC.co.thong.tin + TSTC.co.nhan.su +
TSTC.pp.khong.phuc.tap + TSTC.khong.co.dong.co +
TSTC.e.ngai.nha.dau.tu +
TSTC.cac.rao.can, data = MauNDT)
Residuals:
Min 1Q Median 3Q Max
-1.77049 -0.44942 -0.02364 0.35600 1.96085
Coefficients:
168ii
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.79548 0.18405 4.322 2.37e-05 ***
TSTC.co.thong.tin 0.14454 0.06259 2.309 0.021888 *
TSTC.co.nhan.su 0.26800 0.07218 3.713 0.000261 ***
TSTC.pp.khong.phuc.tap 0.08827 0.06372 1.385 0.167450
TSTC.khong.co.dong.co -0.05153 0.08404 -0.613 0.540470
TSTC.e.ngai.nha.dau.tu 0.12266 0.09418 1.302 0.194203
TSTC.cac.rao.can 0.27495 0.06886 3.993 8.97e-05 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.6793 on 214 degrees of freedom
Multiple R-squared: 0.502, Adjusted R-squared: 0.4881
F-statistic: 35.96 on 6 and 214 DF, p-value: < 2.2e-16
>
hqdantincayDNTSTC=lm(TSTC.dang.tin.cay~TSTC.co.thong.tin+TSTC.co.nhan.su+T
STC.pp.khong.phuc.tap+TSTC.khong.co.dong.co+TSTC.e.ngai.nha.dau.tu+TSTC.ca
c.rao.can, data=MauDN)
> summary(hqdantincayDNTSTC)
Call:
lm(formula = TSTC.dang.tin.cay ~ TSTC.co.thong.tin + TSTC.co.nhan.su +
TSTC.pp.khong.phuc.tap + TSTC.khong.co.dong.co +
TSTC.e.ngai.nha.dau.tu +
TSTC.cac.rao.can, data = MauDN)
Residuals:
Min 1Q Median 3Q Max
-2.72249 -0.40680 -0.00773 0.37618 2.58028
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 1.44231 0.25293 5.702 7.39e-08 ***
TSTC.co.thong.tin 0.33606 0.08773 3.831 0.000197 ***
TSTC.co.nhan.su -0.03954 0.09385 -0.421 0.674197
TSTC.pp.khong.phuc.tap -0.03908 0.08108 -0.482 0.630671
TSTC.khong.co.dong.co 0.41170 0.08725 4.719 5.97e-06 ***
TSTC.e.ngai.nha.dau.tu -0.29436 0.10630 -2.769 0.006429 **
TSTC.cac.rao.can 0.26656 0.10514 2.535 0.012401 *
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.8261 on 132 degrees of freedom
Multiple R-squared: 0.4432, Adjusted R-squared: 0.4179
F-statistic: 17.51 on 6 and 132 DF, p-value: 7.646e-15
> summary(Khoanmuc)
Doi.tuong Loai Khoan.muc Ung.ho
Doanh nghiep:556 Tu do :556 BDSDT :360 Min. :0.000
Nha dau tu :884 Niem yet :220 TSCDHH:360 1st Qu.:1.000
KTV :192 TSTC :360 Median :1.000
Co phan :120 TSVH :360 Mean :0.809
Von nuoc ngoai: 88 3rd Qu.:1.000
169ii
DN khac : 84 Max. :1.000
(Other) :180
Gia.hien.tai Su.thay.doi.gia Bao.toan.von Thich.hop
Min. :1.000 Min. :1.000 Min. :1.000 Min. :1.000
1st Qu.:4.000 1st Qu.:3.000 1st Qu.:3.000 1st Qu.:3.000
Median :4.000 Median :4.000 Median :4.000 Median :4.000
Mean :4.001 Mean :3.738 Mean :3.834 Mean :3.963
3rd Qu.:5.000 3rd Qu.:5.000 3rd Qu.:5.000 3rd Qu.:5.000
Max. :5.000 Max. :5.000 Max. :5.000 Max. :5.000
Co.thong.tin Co.nhan.su PP.khong.phuc.tap Khong.co.dong.co
Min. : 0.000 Min. :1.000 Min. :1.000 Min. :1.00
1st Qu.: 2.000 1st Qu.:2.000 1st Qu.:2.000 1st Qu.:2.00
Median : 3.000 Median :3.000 Median :3.000 Median :3.00
Mean : 2.763 Mean :3.007 Mean :2.658 Mean :3.03
3rd Qu.: 4.000 3rd Qu.:4.000 3rd Qu.:3.000 3rd Qu.:4.00
Max. :11.000 Max. :5.000 Max. :5.000 Max. :5.00
e.ngai.NDT Cac.rao.can Dang..tin.cay CP.cao
Min. :1.00 Min. :1.000 Min. :1.000 Min. :0.000
1st Qu.:2.00 1st Qu.:2.000 1st Qu.:2.000 1st Qu.:3.000
Median :3.00 Median :3.000 Median :3.000 Median :3.000
Mean :3.05 Mean :3.178 Mean :3.239 Mean :3.425
3rd Qu.:4.00 3rd Qu.:4.000 3rd Qu.:4.000 3rd Qu.:4.000
Max. :5.00 Max. :5.000 Max. :5.000 Max. :5.000
Cong.bo.nhieu.thong.tin
Min. :1.000
1st Qu.:2.000
Median :3.000
Mean :2.915
3rd Qu.:4.000
Max. :5.000
NA's :1
>
hqdantincaykhoanmuc=lm(Dang..tin.cay~Co.thong.tin+Co.nhan.su+PP.khong.phuc
.tap+Khong.co.dong.co+e.ngai.NDT+Cac.rao.can, data=Khoanmuc)
> summary(hqdantincaykhoanmuc)
Call:
lm(formula = Dang..tin.cay ~ Co.thong.tin + Co.nhan.su + PP.khong.phuc.tap
+
Khong.co.dong.co + e.ngai.NDT + Cac.rao.can, data = Khoanmuc)
Residuals:
Min 1Q Median 3Q Max
-3.3702 -0.4544 -0.0301 0.4725 3.3511
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 0.84338 0.08013 10.525 < 2e-16 ***
Co.thong.tin 0.08588 0.02511 3.420 0.000644 ***
Co.nhan.su 0.23999 0.02787 8.612 < 2e-16 ***
PP.khong.phuc.tap 0.12126 0.02472 4.905 1.04e-06 ***
170ii
Khong.co.dong.co 0.10806 0.02998 3.605 0.000323 ***
e.ngai.NDT 0.06787 0.03342 2.030 0.042501 *
Cac.rao.can 0.18247 0.03050 5.982 2.78e-09 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.8401 on 1433 degrees of freedom
Multiple R-squared: 0.4064, Adjusted R-squared: 0.4039
F-statistic: 163.5 on 6 and 1433 DF, p-value: < 2.2e-16
> t.test(BDSDT~Doi.tuong, data=Mau)
Welch Two Sample t-test
data: BDSDT by Doi.tuong
t = -2.7386, df = 219.42, p-value = 0.006677
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.17241885 -0.02810851
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
0.8273381 0.9276018
> wilcox.test(BDSDT ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: BDSDT by Doi.tuong
W = 13820, p-value = 0.003261
alternative hypothesis: true location shift is not equal to 0
> t.test(TSCDHH ~Doi.tuong, data=Mau)
Welch Two Sample t-test
data: TSCDHH by Doi.tuong
t = -1.5526, df = 269.1, p-value = 0.1217
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.1624342 0.0192004
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
0.7338129 0.8054299
> wilcox.test(TSCDHH ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: TSCDHH by Doi.tuong
W = 14260, p-value = 0.1122
alternative hypothesis: true location shift is not equal to 0
> t.test(TSVH ~Doi.tuong, data=Mau)
171ii
Welch Two Sample t-test
data: TSVH by Doi.tuong
t = -0.76531, df = 284.6, p-value = 0.4447
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.13523189 0.05951328
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
0.6906475 0.7285068
> wilcox.test(TSVH ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: TSVH by Doi.tuong
W = 14778, p-value = 0.4401
alternative hypothesis: true location shift is not equal to 0
> t.test(TSTC ~Doi.tuong, data=Mau)
Welch Two Sample t-test
data: TSTC by Doi.tuong
t = -1.172, df = 265.38, p-value = 0.2422
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.12318362 0.03125354
sample estimates:
mean in group Doanh nghiep mean in group Nha dau tu
0.8273381 0.8733032
> wilcox.test(TSTC ~ Doi.tuong, data=Mau)
Wilcoxon rank sum test with continuity correction
data: TSTC by Doi.tuong
W = 14654, p-value = 0.2281
alternative hypothesis: true location shift is not equal to 0
> sosanhungho=aov(Ung.ho~Khoan.muc,data=Khoanmuc)
> summary(sosanhungho)
Df Sum Sq Mean Sq F value Pr(>F)
Khoan.muc 3 6.69 2.2285 14.83 1.64e-09 ***
Residuals 1436 215.80 0.1503
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> TukeyHSD(sosanhungho)
Tukey multiple comparisons of means
95% family-wise confidence level
Fit: aov(formula = Ung.ho ~ Khoan.muc, data = Khoanmuc)
$Khoan.muc
172ii
diff lwr upr p adj
TSCDHH-BDSDT -0.11111111 -0.185428000 -0.03679422 0.0007243
TSTC-BDSDT -0.03333333 -0.107650223 0.04098356 0.6562309
TSVH-BDSDT -0.17500000 -0.249316889 -0.10068311 0.0000000
TSTC-TSCDHH 0.07777778 0.003460889 0.15209467 0.0361351
TSVH-TSCDHH -0.06388889 -0.138205778 0.01042800 0.1206534
TSVH-TSTC -0.14166667 -0.215983556 -0.06734978 0.0000063
> sosanhungho2=aov(Ung.ho~Khoan.muc+Doi.tuong, data=Khoanmuc)
> Summary(sosanhungho2)
Error in (function (classes, fdef, mtable) :
unable to find an inherited method for function ‘Summary’ for signature
‘"aov"’
>
lgBDSDT=glm(BDSDT~BDSDT.thich.hop+BDSDT.dang.tin.cay+BDSDT.chi.phi.cao+BDS
DT.cong.bo.thong.tin, family=binomial, data=MauDN)
> summary(lgBDSDT)
Call:
glm(formula = BDSDT ~ BDSDT.thich.hop + BDSDT.dang.tin.cay +
BDSDT.chi.phi.cao + BDSDT.cong.bo.thong.tin, family = binomial,
data = MauDN)
Deviance Residuals:
Min 1Q Median 3Q Max
-2.6212 0.1535 0.3136 0.5686 1.6680
Coefficients:
Estimate Std. Error z value Pr(>|z|)
(Intercept) -3.3783 1.4157 -2.386 0.01702 *
BDSDT.thich.hop 0.5612 0.2418 2.321 0.02028 *
BDSDT.dang.tin.cay 0.9353 0.2878 3.250 0.00115 **
BDSDT.chi.phi.cao -0.2971 0.2493 -1.192 0.23328
BDSDT.cong.bo.thong.tin 0.3921 0.2464 1.592 0.11148
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 127.90 on 138 degrees of freedom
Residual deviance: 97.69 on 134 degrees of freedom
AIC: 107.69
Number of Fisher Scoring iterations: 6
>
lgBDSDT=glm(TSCDHH~TSCDHH.thich.hop+TSCDHH..dang.tin.cay+TSCDHH.chi.phi.ca
o+TSCDHH.cong.bo.thong.tin, family=binomial,data=MauDN)
>
lgTSCDHH=glm(TSCDHH~TSCDHH.thich.hop+TSCDHH..dang.tin.cay+TSCDHH.chi.phi.c
ao+TSCDHH.cong.bo.thong.tin, family=binomial,data=MauDN)
> summary(lgTSCDHH)
Call:
173ii
glm(formula = TSCDHH ~ TSCDHH.thich.hop + TSCDHH..dang.tin.cay +
TSCDHH.chi.phi.cao + TSCDHH.cong.bo.thong.tin, family = binomial,
data = MauDN)
Deviance Residuals:
Min 1Q Median 3Q Max
-2.7685 -0.3824 0.2799 0.6142 2.1785
Coefficients:
Estimate Std. Error z value Pr(>|z|)
(Intercept) -5.15493 1.37398 -3.752 0.000176 ***
TSCDHH.thich.hop 1.09353 0.22049 4.960 7.07e-07 ***
TSCDHH..dang.tin.cay 0.68127 0.23135 2.945 0.003233 **
TSCDHH.chi.phi.cao -0.01177 0.25039 -0.047 0.962520
TSCDHH.cong.bo.thong.tin 0.11480 0.20575 0.558 0.576865
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 161.08 on 138 degrees of freedom
Residual deviance: 104.04 on 134 degrees of freedom
AIC: 114.04
Number of Fisher Scoring iterations: 5
>
lgTSTC=glm(TSTC~TSTC.thich.hop+TSTC.dang.tin.cay+TSTC.chi.phi.cao+TSTC.con
g.bo.thong.tin, family=binomial,data=MauDN)
> logic4=read.csv("D:\\HOC NCS\\NCS\\BAI VIET\\R\\logic4-R.csv", header=T)
> dim(logic4)
[1] 139 35
> names(logic4)
[1] "DCP" "DNY"
[3] "Dnn" "Size"
[5] "Quy.mo" "LEV"
[7] "Don.bay" "TT.BDSDT"
[9] "TT.TSCDHH" "TT.TSVH"
[11] "TT.TSTC" "Ti.trong.BDSDT"
[13] "Ti.trong.TSCDHH" "Ti.trong.TSVH"
[15] "Ti.trong.TSTC" "BDSDT"
[17] "BDSDT.thich.hop" "BDSDT.dang.tin.cay"
[19] "BDSDT.chi.phi.cao" "BDSDT.cong.bo.thong.tin"
[21] "TSCDHH" "TSCDHH.thich.hop"
[23] "TSCDHH..dang.tin.cay" "TSCDHH.chi.phi.cao"
[25] "TSCDHH.cong.bo.thong.tin" "TSVH"
[27] "TSVH.thich.hop" "TSVH.dang.tin.cay"
[29] "TSVH.chi.phi.cao" "TSVH.cong.bo.thong.tin"
[31] "TSTC" "TSTC.thich.hop"
[33] "TSTC.dang.tin.cay" "TSTC.chi.phi.cao"
[35] "TSTC.cong.bo.thong.tin"
>
lg4BDSDT=glm(BDSDT~BDSDT.thich.hop+BDSDT.dang.tin.cay+BDSDT.chi.phi.cao+BD
174ii
SDT.cong.bo.thong.tin+Don.bay+TT.BDSDT+DCP+Dnn+DNY+Quy.mo,
family=binomial, data=logic4)
> summary(lg4BDSDT)
Call:
glm(formula = BDSDT ~ BDSDT.thich.hop + BDSDT.dang.tin.cay +
BDSDT.chi.phi.cao + BDSDT.cong.bo.thong.tin + Don.bay + TT.BDSDT +
DCP + Dnn + DNY + Quy.mo, family = binomial, data = logic4)
Deviance Residuals:
Min 1Q Median 3Q Max
-2.71542 0.09148 0.23698 0.49802 1.65890
Coefficients:
Estimate Std. Error z value Pr(>|z|)
(Intercept) -3.58073 1.86875 -1.916 0.05535 .
BDSDT.thich.hop 0.64524 0.27322 2.362 0.01820 *
BDSDT.dang.tin.cay 0.91205 0.32042 2.846 0.00442 **
BDSDT.chi.phi.cao -0.08952 0.28585 -0.313 0.75416
BDSDT.cong.bo.thong.tin 0.50554 0.28826 1.754 0.07947 .
Don.bay 1.00 -1.14078 0.59013 -1.933 0.05323 .
TT.BDSDT 1.00 -0.81439 0.60625 -1.343 0.17916
DCP 1.21940 1.34421 0.907 0.36433
Dnn -1.47091 0.95278 -1.544 0.12264
DNY -1.30649 0.83847 -1.558 0.11919
Quy.mo 1.00 0.84733 0.91030 0.931 0.35194
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 127.903 on 138 degrees of freedom
Residual deviance: 84.435 on 128 degrees of freedom
AIC: 106.43
Number of Fisher Scoring iterations: 6
>
lg4TSCDHH=glm(TSCDHH~TSCDHH.thich.hop+TSCDHH..dang.tin.cay+TSCDHH.chi.phi.
cao+TSCDHH.cong.bo.thong.tin+Don.bay+TT.TSCDHH+DCP+Dnn+DNY+Quy.mo,
family=binomial, data=logic4)
> summary(lg4TSCDHH)
Call:
glm(formula = TSCDHH ~ TSCDHH.thich.hop + TSCDHH..dang.tin.cay +
TSCDHH.chi.phi.cao + TSCDHH.cong.bo.thong.tin + Don.bay +
TT.TSCDHH + DCP + Dnn + DNY + Quy.mo, family = binomial,
data = logic4)
Deviance Residuals:
Min 1Q Median 3Q Max
-2.6311 -0.3671 0.2842 0.5641 2.0681
Coefficients:
175ii
Estimate Std. Error z value Pr(>|z|)
(Intercept) -6.59777 1.70242 -3.876 0.000106 ***
TSCDHH.thich.hop 1.08406 0.22398 4.840 1.3e-06 ***
TSCDHH..dang.tin.cay 0.76037 0.24534 3.099 0.001940 **
TSCDHH.chi.phi.cao -0.05517 0.26830 -0.206 0.837071
TSCDHH.cong.bo.thong.tin 0.15208 0.21705 0.701 0.483504
Don.bay 1.00 0.46607 0.54471 0.856 0.392200
TT.TSCDHH 1.00 0.79783 0.61093 1.306 0.191578
DCP 0.77991 0.76880 1.014 0.310362
Dnn 0.86355 0.92086 0.938 0.348367
DNY 0.77348 0.72648 1.065 0.287009
Quy.mo 1.00 0.29741 0.67511 0.441 0.659553
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 161.08 on 138 degrees of freedom
Residual deviance: 100.38 on 128 degrees of freedom
AIC: 122.38
Number of Fisher Scoring iterations: 6
>
lg4TSVH=glm(TSVH~TSVH.thich.hop+TSVH.dang.tin.cay+TSVH.chi.phi.cao+TSVH.co
ng.bo.thong.tin+Don.bay+TT.TSVH+DCP+Dnn+DNY+Quy.mo, family=binomial,
data=logic4)
> summary(lg4TSVH)
Call:
glm(formula = TSVH ~ TSVH.thich.hop + TSVH.dang.tin.cay + TSVH.chi.phi.cao
+
TSVH.cong.bo.thong.tin + Don.bay + TT.TSVH + DCP + Dnn +
DNY + Quy.mo, family = binomial, data = logic4)
Deviance Residuals:
Min 1Q Median 3Q Max
-2.3243 -0.8319 0.4011 0.6921 2.3518
Coefficients:
Estimate Std. Error z value Pr(>|z|)
(Intercept) -1.0255 1.2827 -0.799 0.424015
TSVH.thich.hop 0.6231 0.2000 3.115 0.001837 **
TSVH.dang.tin.cay 0.8353 0.2228 3.749 0.000178 ***
TSVH.chi.phi.cao -0.2317 0.2244 -1.033 0.301690
TSVH.cong.bo.thong.tin -0.4567 0.2104 -2.171 0.029919 *
Don.bay 1.00 -0.2939 0.4566 -0.644 0.519818
TT.TSVH 1.00 -0.1668 0.5886 -0.283 0.776924
DCP 0.7552 0.7020 1.076 0.281988
Dnn 0.6701 0.7907 0.847 0.396724
DNY -0.2666 0.6268 -0.425 0.670548
Quy.mo 1.00 -0.5074 0.6889 -0.737 0.461410
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
176ii
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 171.97 on 138 degrees of freedom
Residual deviance: 130.13 on 128 degrees of freedom
AIC: 152.13
Number of Fisher Scoring iterations: 5
>
lg4TSTC=glm(TSTC~TSTC.thich.hop+TSTC.dang.tin.cay+TSTC.chi.phi.cao+TSTC.co
ng.bo.thong.tin+Don.bay+TT.TSTC+DCP+Dnn+DNY+Quy.mo, family=binomial,
data=logic4)
> summary(lg4TSTC)
Call:
glm(formula = TSTC ~ TSTC.thich.hop + TSTC.dang.tin.cay + TSTC.chi.phi.cao
+
TSTC.cong.bo.thong.tin + Don.bay + TT.TSTC + DCP + Dnn +
DNY + Quy.mo, family = binomial, data = logic4)
Deviance Residuals:
Min 1Q Median 3Q Max
-3.9051 0.0015 0.0171 0.1038 1.4026
Coefficients:
Estimate Std. Error z value Pr(>|z|)
(Intercept) -12.88051 4.70121 -2.740 0.006147 **
TSTC.thich.hop 3.10601 0.85934 3.614 0.000301 ***
TSTC.dang.tin.cay 2.42678 0.80970 2.997 0.002725 **
TSTC.chi.phi.cao 0.01353 0.69431 0.019 0.984455
TSTC.cong.bo.thong.tin 0.32735 0.68321 0.479 0.631842
Don.bay 1.00 -1.13130 1.19675 -0.945 0.344499
TT.TSTC 1.00 -0.28262 1.14841 -0.246 0.805605
DCP 1.89916 1.71551 1.107 0.268271
Dnn -1.60495 1.78971 -0.897 0.369844
DNY -0.59269 1.28918 -0.460 0.645699
Quy.mo 1.00 -3.32788 1.98231 -1.679 0.093194 .
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 127.903 on 138 degrees of freedom
Residual deviance: 31.134 on 128 degrees of freedom
AIC: 53.134
Number of Fisher Scoring iterations: 9
> library(rms)
Loading required package: Hmisc
Loading required package: lattice
Loading required package: survival
Loading required package: Formula
177ii
Loading required package: ggplot2
Attaching package: ‘Hmisc’
The following objects are masked from ‘package:base’:
format.pval, round.POSIXt, trunc.POSIXt, units
Loading required package: SparseM
Attaching package: ‘SparseM’
The following object is masked from ‘package:base’:
backsolve
>
hqlrmBDSDT=lrm(BDSDT~BDSDT.thich.hop+BDSDT.dang.tin.cay+BDSDT.chi.phi.cao+
BDSDT.cong.bo.thong.tin, data=MauDN)
> hqlrmBDSDT
Logistic Regression Model
lrm(formula = BDSDT ~ BDSDT.thich.hop + BDSDT.dang.tin.cay +
BDSDT.chi.phi.cao + BDSDT.cong.bo.thong.tin, data = MauDN)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 30.21 R2 0.325 C 0.830
0 24 d.f. 4 g 1.746 Dxy 0.659
1 115 Pr(> chi2) <0.0001 gr 5.730 gamma 0.662
max |deriv| 2e-07 gp 0.190 tau-a 0.190
Brier 0.110
Coef S.E. Wald Z Pr(>|Z|)
Intercept -3.3783 1.4157 -2.39 0.0170
BDSDT.thich.hop 0.5612 0.2418 2.32 0.0203
BDSDT.dang.tin.cay 0.9353 0.2878 3.25 0.0012
BDSDT.chi.phi.cao -0.2971 0.2493 -1.19 0.2333
BDSDT.cong.bo.thong.tin 0.3921 0.2464 1.59 0.1115
>
hqlrmTSCDHH=lrm(TSCDHH~TSCDHH.thich.hop+TSCDHH..dang.tin.cay+TSCDHH.chi.ph
i.cao+TSCDHH.cong.bo.thong.tin, data=MauDN)
> hqlrmTSCDHH
Logistic Regression Model
lrm(formula = TSCDHH ~ TSCDHH.thich.hop + TSCDHH..dang.tin.cay +
TSCDHH.chi.phi.cao + TSCDHH.cong.bo.thong.tin, data = MauDN)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 57.04 R2 0.491 C 0.882
0 37 d.f. 4 g 2.147 Dxy 0.764
178ii
1 102 Pr(> chi2) <0.0001 gr 8.558 gamma 0.767
max |deriv| 3e-07 gp 0.295 tau-a 0.301
Brier 0.116
Coef S.E. Wald Z Pr(>|Z|)
Intercept -5.1549 1.3740 -3.75 0.0002
TSCDHH.thich.hop 1.0935 0.2205 4.96 <0.0001
TSCDHH..dang.tin.cay 0.6813 0.2314 2.94 0.0032
TSCDHH.chi.phi.cao -0.0118 0.2504 -0.05 0.9625
TSCDHH.cong.bo.thong.tin 0.1148 0.2058 0.56 0.5769
>
hqlrmTSVH=lrm(TSVH~TSVH.thich.hop+TSVH.dang.tin.cay+TSVH.chi.phi.cao+TSVH.
cong.bo.thong.tin, data=MauDN)
> hqlrmTSVH
Logistic Regression Model
lrm(formula = TSVH ~ TSVH.thich.hop + TSVH.dang.tin.cay + TSVH.chi.phi.cao
+
TSVH.cong.bo.thong.tin, data = MauDN)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 35.64 R2 0.319 C 0.802
0 43 d.f. 4 g 1.548 Dxy 0.603
1 96 Pr(> chi2) <0.0001 gr 4.704 gamma 0.611
max |deriv| 1e-10 gp 0.256 tau-a 0.260
Brier 0.166
Coef S.E. Wald Z Pr(>|Z|)
Intercept -1.5177 0.9885 -1.54 0.1247
TSVH.thich.hop 0.5844 0.1881 3.11 0.0019
TSVH.dang.tin.cay 0.7940 0.2119 3.75 0.0002
TSVH.chi.phi.cao -0.1935 0.2142 -0.90 0.3664
TSVH.cong.bo.thong.tin -0.4189 0.1996 -2.10 0.0358
>
>
hqlrmTSTC=lrm(TSTC~TSTC.thich.hop+TSTC.dang.tin.cay+TSTC.chi.phi.cao+TSTC.
cong.bo.thong.tin, data=MauDN)
> hqlrmTSTC
Logistic Regression Model
lrm(formula = TSTC ~ TSTC.thich.hop + TSTC.dang.tin.cay + TSTC.chi.phi.cao
+
TSTC.cong.bo.thong.tin, data = MauDN)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 87.54 R2 0.777 C 0.969
0 24 d.f. 4 g 4.810 Dxy 0.939
1 115 Pr(> chi2) <0.0001 gr 122.698 gamma 0.943
179ii
max |deriv| 2e-08 gp 0.273 tau-a 0.270
Brier 0.038
Coef S.E. Wald Z Pr(>|Z|)
Intercept -11.7906 3.3685 -3.50 0.0005
TSTC.thich.hop 2.3401 0.5525 4.24 <0.0001
TSTC.dang.tin.cay 2.1248 0.5903 3.60 0.0003
TSTC.chi.phi.cao -0.6522 0.4958 -1.32 0.1884
TSTC.cong.bo.thong.tin 0.4111 0.5131 0.80 0.4230
>
hqlrmBDSDT2=lrm(BDSDT~BDSDT.thich.hop+BDSDT.dang.tin.cay+BDSDT.chi.phi.cao
+BDSDT.cong.bo.thong.tin+TT.BDSDT+Quy.mo+Don.bay+DCP+DNY+Dnn, data=logic4)
> hqlrmBDSDT2
Logistic Regression Model
lrm(formula = BDSDT ~ BDSDT.thich.hop + BDSDT.dang.tin.cay +
BDSDT.chi.phi.cao + BDSDT.cong.bo.thong.tin + TT.BDSDT +
Quy.mo + Don.bay + DCP + DNY + Dnn, data = logic4)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 43.47 R2 0.446 C 0.877
0 24 d.f. 10 g 2.473 Dxy 0.754
1 115 Pr(> chi2) <0.0001 gr 11.856 gamma 0.757
max |deriv| 1e-08 gp 0.220 tau-a 0.217
Brier 0.094
Coef S.E. Wald Z Pr(>|Z|)
Intercept -3.5807 1.8688 -1.92 0.0554
BDSDT.thich.hop 0.6452 0.2732 2.36 0.0182
BDSDT.dang.tin.cay 0.9120 0.3204 2.85 0.0044
BDSDT.chi.phi.cao -0.0895 0.2859 -0.31 0.7542
BDSDT.cong.bo.thong.tin 0.5055 0.2883 1.75 0.0795
TT.BDSDT= 1.00 -0.8144 0.6063 -1.34 0.1792
Quy.mo= 1.00 0.8473 0.9103 0.93 0.3520
Don.bay= 1.00 -1.1408 0.5901 -1.93 0.0532
DCP 1.2194 1.3444 0.91 0.3644
DNY -1.3065 0.8385 -1.56 0.1192
Dnn -1.4709 0.9528 -1.54 0.1226
>
>
hqlrmTSCDHH2=lrm(TSCDHH~TSCDHH.thich.hop+TSCDHH..dang.tin.cay+TSCDHH.chi.p
hi.cao+TSCDHH.cong.bo.thong.tin+TT.TSCDHH+Quy.mo+Don.bay+DCP+DNY+Dnn,
data=logic4)
> hqlrmTSCDHH2
Logistic Regression Model
lrm(formula = TSCDHH ~ TSCDHH.thich.hop + TSCDHH..dang.tin.cay +
TSCDHH.chi.phi.cao + TSCDHH.cong.bo.thong.tin + TT.TSCDHH +
180ii
Quy.mo + Don.bay + DCP + DNY + Dnn, data = logic4)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 60.70 R2 0.516 C 0.886
0 37 d.f. 10 g 2.305 Dxy 0.773
1 102 Pr(> chi2) <0.0001 gr 10.020 gamma 0.774
max |deriv| 3e-06 gp 0.304 tau-a 0.304
Brier 0.113
Coef S.E. Wald Z Pr(>|Z|)
Intercept -6.5978 1.7024 -3.88 0.0001
TSCDHH.thich.hop 1.0841 0.2240 4.84 <0.0001
TSCDHH..dang.tin.cay 0.7604 0.2453 3.10 0.0019
TSCDHH.chi.phi.cao -0.0552 0.2683 -0.21 0.8371
TSCDHH.cong.bo.thong.tin 0.1521 0.2170 0.70 0.4835
TT.TSCDHH= 1.00 0.7978 0.6109 1.31 0.1916
Quy.mo= 1.00 0.2974 0.6751 0.44 0.6596
Don.bay= 1.00 0.4661 0.5447 0.86 0.3922
DCP 0.7799 0.7688 1.01 0.3104
DNY 0.7735 0.7265 1.06 0.2870
Dnn 0.8635 0.9209 0.94 0.3484
>
hqlrmTSVH2=lrm(TSVH~TSVH.thich.hop+TSVH.dang.tin.cay+TSVH.chi.phi.cao+TSVH
.cong.bo.thong.tin+TT.TSVH+Quy.mo+Don.bay+DCP+DNY+Dnn, data=logic4)
> hqlrmTSVH2
Logistic Regression Model
lrm(formula = TSVH ~ TSVH.thich.hop + TSVH.dang.tin.cay + TSVH.chi.phi.cao
+
TSVH.cong.bo.thong.tin + TT.TSVH + Quy.mo + Don.bay + DCP +
DNY + Dnn, data = logic4)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 41.84 R2 0.366 C 0.829
0 43 d.f. 10 g 1.770 Dxy 0.657
1 96 Pr(> chi2) <0.0001 gr 5.874 gamma 0.659
max |deriv| 8e-09 gp 0.276 tau-a 0.283
Brier 0.156
Coef S.E. Wald Z Pr(>|Z|)
Intercept -1.0255 1.2827 -0.80 0.4240
TSVH.thich.hop 0.6231 0.2000 3.12 0.0018
TSVH.dang.tin.cay 0.8353 0.2228 3.75 0.0002
TSVH.chi.phi.cao -0.2317 0.2244 -1.03 0.3017
TSVH.cong.bo.thong.tin -0.4567 0.2104 -2.17 0.0299
TT.TSVH= 1.00 -0.1668 0.5886 -0.28 0.7769
Quy.mo= 1.00 -0.5074 0.6889 -0.74 0.4614
Don.bay= 1.00 -0.2939 0.4566 -0.64 0.5198
DCP 0.7552 0.7020 1.08 0.2820
DNY -0.2666 0.6268 -0.43 0.6705
Dnn 0.6701 0.7907 0.85 0.3967
181ii
>
hqlrmTSTC2=lrm(TSTC~TSTC.thich.hop+TSTC.dang.tin.cay+TSTC.chi.phi.cao+TSTC
.cong.bo.thong.tin+TT.TSTC+Quy.mo+Don.bay+DCP+DNY+Dnn, data=logic4)
> hqlrmTSTC2
Logistic Regression Model
lrm(formula = TSTC ~ TSTC.thich.hop + TSTC.dang.tin.cay + TSTC.chi.phi.cao
+
TSTC.cong.bo.thong.tin + TT.TSTC + Quy.mo + Don.bay + DCP +
DNY + Dnn, data = logic4)
Model Likelihood Discrimination Rank Discrim.
Ratio Test Indexes Indexes
Obs 139 LR chi2 96.77 R2 0.834 C 0.971
0 24 d.f. 10 g 6.856 Dxy 0.942
1 115 Pr(> chi2) <0.0001 gr 949.163 gamma 0.968
max |deriv| 3e-08 gp 0.280 tau-a 0.271
Brier 0.021
Coef S.E. Wald Z Pr(>|Z|)
Intercept -12.8805 4.7012 -2.74 0.0061
TSTC.thich.hop 3.1060 0.8593 3.61 0.0003
TSTC.dang.tin.cay 2.4268 0.8097 3.00 0.0027
TSTC.chi.phi.cao 0.0135 0.6943 0.02 0.9845
TSTC.cong.bo.thong.tin 0.3273 0.6832 0.48 0.6318
TT.TSTC= 1.00 -0.2826 1.1484 -0.25 0.8056
Quy.mo= 1.00 -3.3279 1.9823 -1.68 0.0932
Don.bay= 1.00 -1.1313 1.1967 -0.95 0.3445
DCP 1.8992 1.7155 1.11 0.2683
DNY -0.5927 1.2892 -0.46 0.6457
Dnn -1.6049 1.7897 -0.90 0.3698
>
> L
Error: unexpected input in "L\"
>
> op = par(mfrow = c(4,4))
> plot(logic4$BDSDT.thich.hop,
fitted(glm(logic4$BDSDT~logic4$BDSDT.thich.hop, family = "binomial")))
> abline(lm(logic4$BDSDT~logic4$BDSDT.thich.hop))
> plot(logic4$BDSDT.dang.tin.cay,
fitted(glm(logic4$BDSDT~logic4$BDSDT.dang.tin.cay, family = "binomial")))
> abline(lm(logic4$BDSDT~logic4$BDSDT.dang.tin.cay))
> plot(logic4$BDSDT.chi.phi.cao,
fitted(glm(logic4$BDSDT~logic4$BDSDT.chi.phi.cao, family = "binomial")))
> abline(lm(logic4$BDSDT~logic4$BDSDT.chi.phi.cao))
> plot(logic4$BDSDT.cong.bo.thong.tin,
fitted(glm(logic4$BDSDT~logic4$BDSDT.cong.bo.thong.tin, family =
"binomial")))
> abline(lm(logic4$BDSDT~logic4$BDSDT.cong.bo.thong.tin))
>
182ii
> plot(logic4$TSCDHH.thich.hop,
fitted(glm(logic4$TSCDHH~logic4$TSCDHH.thich.hop, family = "binomial")))
> abline(lm(logic4$TSCDHH~logic4$TSCDHH.thich.hop))
> plot(logic4$TSCDHH..dang.tin.cay,
fitted(glm(logic4$TSCDHH~logic4$TSCDHH..dang.tin.cay, family =
"binomial")))
> abline(lm(logic4$TSCDHH~logic4$TSCDHH..dang.tin.cay))
> plot(logic4$TSCDHH.chi.phi.cao,
fitted(glm(logic4$TSCDHH~logic4$TSCDHH.chi.phi.cao, family = "binomial")))
> abline(lm(logic4$TSCDHH~logic4$TSCDHH.chi.phi.cao))
> plot(logic4$TSCDHH.cong.bo.thong.tin,
fitted(glm(logic4$TSCDHH~logic4$TSCDHH.cong.bo.thong.tin, family =
"binomial")))
> abline(lm(logic4$TSCDHH~logic4$TSCDHH.cong.bo.thong.tin))
>
> plot(logic4$TSVH.thich.hop,
fitted(glm(logic4$TSVH~logic4$TSVH.thich.hop, family = "binomial")))
> abline(lm(logic4$TSVH~logic4$TSVH.thich.hop))
> plot(logic4$TSVH.dang.tin.cay,
fitted(glm(logic4$TSVH~logic4$TSVH.dang.tin.cay, family = "binomial")))
> abline(lm(logic4$TSVH~logic4$TSVH.dang.tin.cay))
> plot(logic4$TSVH.chi.phi.cao,
fitted(glm(logic4$TSVH~logic4$TSVH.chi.phi.cao, family = "binomial")))
> abline(lm(logic4$TSVH~logic4$TSVH.chi.phi.cao))
> plot(logic4$TSVH.cong.bo.thong.tin,
fitted(glm(logic4$TSVH~logic4$TSVH.cong.bo.thong.tin, family =
"binomial")))
> abline(lm(logic4$TSVH~logic4$TSVH.cong.bo.thong.tin))
>
> plot(logic4$TSTC.thich.hop,
fitted(glm(logic4$TSTC~logic4$TSTC.thich.hop, family = "binomial")))
> abline(lm(logic4$TSTC~logic4$TSTC.thich.hop))
> plot(logic4$TSTC.dang.tin.cay,
fitted(glm(logic4$TSTC~logic4$TSTC.dang.tin.cay, family = "binomial")))
> abline(lm(logic4$TSTC~logic4$TSTC.dang.tin.cay))
> plot(logic4$TSTC.chi.phi.cao,
fitted(glm(logic4$TSTC~logic4$TSTC.chi.phi.cao, family = "binomial")))
> abline(lm(logic4$TSTC~logic4$TSTC.chi.phi.cao))
> plot(logic4$TSTC.cong.bo.thong.tin,
fitted(glm(logic4$TSTC~logic4$TSTC.cong.bo.thong.tin, family =
"binomial")))
> abline(lm(logic4$TSTC~logic4$TSTC.cong.bo.thong.tin))
>
>
>
> Phân tích các bi
Error: unexpected symbol in "Phân tích"
>
> aggregate(MauDN$BDSDT.thich.hop, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 4.400000
2 DN khac 4.333333
3 DNNN 3.909091
4 Niem yet 4.145455
183ii
5 Von nuoc ngoai 4.454545
> aggregate(MauDN$TSCDHH.thich.hop, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 4.033333
2 DN khac 3.857143
3 DNNN 3.727273
4 Niem yet 3.618182
5 Von nuoc ngoai 4.090909
> aggregate(MauDN$TSVH.thich.hop, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.900000
2 DN khac 3.428571
3 DNNN 3.909091
4 Niem yet 3.781818
5 Von nuoc ngoai 3.954545
> aggregate(MauDN$TSTC.thich.hop, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 4.133333
2 DN khac 4.190476
3 DNNN 4.181818
4 Niem yet 3.909091
5 Von nuoc ngoai 4.227273
>
> aggregate(MauDN$BDSDT.dang.tin.cay, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.666667
2 DN khac 3.571429
3 DNNN 3.181818
4 Niem yet 2.909091
5 Von nuoc ngoai 3.272727
> aggregate(MauDN$TSCDHH..dang.tin.cay, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.433333
2 DN khac 3.476190
3 DNNN 3.090909
4 Niem yet 3.290909
5 Von nuoc ngoai 3.227273
> aggregate(MauDN$TSVH.dang.tin.cay, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 2.966667
2 DN khac 2.904762
3 DNNN 3.181818
4 Niem yet 2.909091
5 Von nuoc ngoai 3.000000
> aggregate(MauDN$TSTC.dang.tin.cay, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.800000
2 DN khac 3.571429
3 DNNN 3.363636
4 Niem yet 3.490909
5 Von nuoc ngoai 3.636364
>
>
> aggregate(MauDN$BDSDT.chi.phi.cao, list(MauDN$Loai), FUN = "mean")
184ii
Group.1 x
1 Co phan 2.800000
2 DN khac 3.238095
3 DNNN 3.090909
4 Niem yet 3.545455
5 Von nuoc ngoai 3.363636
> aggregate(MauDN$TSCDHH.chi.phi.cao, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 2.933333
2 DN khac 3.476190
3 DNNN 2.727273
4 Niem yet 3.600000
5 Von nuoc ngoai 3.590909
> aggregate(MauDN$TSVH.chi.phi.cao, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.466667
2 DN khac 3.571429
3 DNNN 3.000000
4 Niem yet 3.727273
5 Von nuoc ngoai 4.045455
> aggregate(MauDN$TSTC.chi.phi.cao, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.233333
2 DN khac 3.047619
3 DNNN 2.909091
4 Niem yet 3.072727
5 Von nuoc ngoai 3.409091
>
> aggregate(MauDN$BDSDT.cong.bo.thong.tin, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.066667
2 DN khac 2.428571
3 DNNN 2.363636
4 Niem yet 3.036364
5 Von nuoc ngoai 2.772727
> aggregate(MauDN$TSCDHH.cong.bo.thong.tin, list(MauDN$Loai), FUN =
"mean")
Group.1 x
1 Co phan 2.866667
2 DN khac 3.000000
3 DNNN 2.454545
4 Niem yet 2.854545
5 Von nuoc ngoai 2.363636
> aggregate(MauDN$TSVH.cong.bo.thong.tin, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.033333
2 DN khac 3.333333
3 DNNN 2.454545
4 Niem yet 3.018182
5 Von nuoc ngoai 2.772727
> aggregate(MauDN$TSTC.cong.bo.thong.tin, list(MauDN$Loai), FUN = "mean")
Group.1 x
1 Co phan 3.033333
2 DN khac 3.380952
185ii
3 DNNN 2.363636
4 Niem yet 2.781818
5 Von nuoc ngoai 2.818182
>
> anovaloaithichhop = aov(BDSDT.thich.hop~Loai, data=MauDN)
> summary(anovaloaithichhop)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 3.61 0.9024 0.967 0.428
Residuals 134 125.07 0.9333
> anovaloaiTSCDHHthichhop = aov(TSCDHH.thich.hop~Loai, data=MauDN)
> summary(anovaloaiTSCDHHthichhop)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 5.34 1.334 0.841 0.501
Residuals 134 212.52 1.586
> anovaloaiTSVHthichhop = aov(TSVH.thich.hop~Loai, data=MauDN)
> summary(anovaloaiTSVHthichhop)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 3.86 0.9653 0.691 0.599
Residuals 134 187.09 1.3962
> anovaloaiTSTCthichhop = aov(TSTC.thich.hop~Loai, data=MauDN)
> summary(anovaloaiTSTCthichhop)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 2.53 0.6326 0.464 0.762
Residuals 134 182.75 1.3638
>
> anovaloaiBDSDTdangtincay = aov(BDSDT.dang.tin.cay~Loai, data=MauDN)
> summary(anovaloaiBDSDTdangtincay)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 13.83 3.458 2.541 0.0427 *
Residuals 134 182.35 1.361
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> TukeyHSD(anovaloaiBDSDTdangtincay)
Tukey multiple comparisons of means
95% family-wise confidence level
Fit: aov(formula = BDSDT.dang.tin.cay ~ Loai, data = MauDN)
$Loai
diff lwr upr p adj
DN khac-Co phan -0.09523810 -1.0130622 0.82258597 0.9985015
DNNN-Co phan -0.48484848 -1.6218986 0.65220158 0.7632787
Niem yet-Co phan -0.75757576 -1.4897461 -0.02540544 0.0386881
Von nuoc ngoai-Co phan -0.39393939 -1.2994100 0.51153116 0.7496077
DNNN-DN khac -0.38961039 -1.5902527 0.81103188 0.8974412
Niem yet-DN khac -0.66233766 -1.4898232 0.16514792 0.1811055
Von nuoc ngoai-DN khac -0.29870130 -1.2828435 0.68544093 0.9178607
Niem yet-DNNN -0.27272727 -1.3381916 0.79273704 0.9544033
Von nuoc ngoai-DNNN 0.09090909 -1.1003162 1.28213441 0.9995536
Von nuoc ngoai-Niem yet 0.36363636 -0.4501255 1.17739818 0.7305465
> anovaloaiTSCDHHdangtincay = aov(TSCDHH..dang.tin.cay~Loai, data=MauDN)
> summary(anovaloaiTSCDHHdangtincay)
Df Sum Sq Mean Sq F value Pr(>F)
186ii
Loai 4 1.71 0.4272 0.274 0.894
Residuals 134 208.72 1.5576
> anovaloaiTSVHdangtincay = aov(TSVH.dang.tin.cay~Loai, data=MauDN)
> summary(anovaloaiTSVHdangtincay)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 0.78 0.1957 0.135 0.969
Residuals 134 194.96 1.4549
> anovaloaiTSTCdangtincay = aov(TSTC.dang.tin.cay~Loai, data=MauDN)
> summary(anovaloaiTSTCdangtincay)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 2.47 0.6185 0.52 0.721
Residuals 134 159.32 1.1890
>
> anovaloaiBDSDTCPcao = aov(BDSDT.chi.phi.cao~Loai, data=MauDN)
> summary(anovaloaiBDSDTCPcao)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 11.37 2.841 2.112 0.0827 .
Residuals 134 180.25 1.345
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> anovaloaiTSCDHHCPcao = aov(TSCDHH.chi.phi.cao~Loai, data=MauDN)
> summary(anovaloaiTSCDHHCPcao)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 14.48 3.621 3.114 0.0174 *
Residuals 134 155.80 1.163
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> TukeyHSD(anovaloaiTSCDHHCPcao)
Tukey multiple comparisons of means
95% family-wise confidence level
Fit: aov(formula = TSCDHH.chi.phi.cao ~ Loai, data = MauDN)
$Loai
diff lwr upr p adj
DN khac-Co phan 0.542857143 -0.30552398 1.3912383 0.3957171
DNNN-Co phan -0.206060606 -1.25708099 0.8449598 0.9827214
Niem yet-Co phan 0.666666667 -0.01010734 1.3434407 0.0556767
Von nuoc ngoai-Co phan 0.657575758 -0.17938652 1.4945380 0.1965178
DNNN-DN khac -0.748917749 -1.85871892 0.3608834 0.3407179
Niem yet-DN khac 0.123809524 -0.64106815 0.8886872 0.9916102
Von nuoc ngoai-DN khac 0.114718615 -0.79496301 1.0244002 0.9967915
Niem yet-DNNN 0.872727273 -0.11212357 1.8575781 0.1085120
Von nuoc ngoai-DNNN 0.863636364 -0.23746035 1.9647331 0.1979486
Von nuoc ngoai-Niem yet -0.009090909 -0.76128317 0.7431013 0.9999997
> anovaloaiTSVHCPcao = aov(TSVH.chi.phi.cao~Loai, data=MauDN)
> summary(anovaloaiTSVHCPcao)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 9.54 2.385 1.943 0.107
Residuals 134 164.47 1.227
> anovaloaiTSTCCPcao = aov(TSTC.chi.phi.cao~Loai, data=MauDN)
> summary(anovaloaiTSTCCPcao)
Df Sum Sq Mean Sq F value Pr(>F)
187ii
Loai 4 2.87 0.7167 0.494 0.74
Residuals 134 194.26 1.4497
>
> anovaloaiBDSDTCBthongtin = aov(BDSDT.cong.bo.thong.tin~Loai, data=MauDN)
> summary(anovaloaiBDSDTCBthongtin)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 9.78 2.444 1.66 0.163
Residuals 134 197.35 1.473
> anovaloaiTSCDHHCBthongtin = aov(TSCDHH.cong.bo.thong.tin~Loai,
data=MauDN)
> summary(anovaloaiTSCDHHCBthongtin)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 6.51 1.628 0.932 0.448
Residuals 134 234.12 1.747
> anovaloaiTSVHCBthongtin = aov(TSVH.cong.bo.thong.tin~Loai, data=MauDN)
> summary(anovaloaiTSVHCBthongtin)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 6.77 1.691 1.094 0.362
Residuals 134 207.21 1.546
> anovaloaiTSTCCBthongtin = aov(TSTC.cong.bo.thong.tin~Loai, data=MauDN)
> summary(anovaloaiTSTCCBthongtin)
Df Sum Sq Mean Sq F value Pr(>F)
Loai 4 9.47 2.368 1.422 0.23
Residuals 134 223.12 1.665
188ii