Publications by thongke.club

ardl_ungdung_GDP

10.07.2020

Tạo dữ liệu library(readxl) setwd("d:/DATA2020/PaerScopus/Von_Quy_GDP") dulieu <-read_excel("data.cutoff.2000.xlsx") dulieu <-data.frame(dulieu) head(dulieu) ## YEAR QUY Time GDP LnGDP TI LnTI IG LnIG IP ## 1 2000 Q1 2000q1 224744 12.32272 48119.6 10.78144 12415.2 9.426677 4636.6 ## 2 2000 Q2 2000q2 2...

141 sym R (20639 sym/67 pcs)

CPI to GDP

10.07.2020

## # A tibble: 6 x 30 ## inpution Panel Tinh_old Tinh Year gGDP GDPP LnGDPP1 LnGDPP2 LnGDPP3 ## <dbl> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> ## 1 1 An G~ An Giang AnGi~ 2010 9.36 18118. 9.80 9.80 9.80 ## 2 1 An G~ An Giang AnGi~ 2011 6.93 22999. 10.0 10.0 10.0 ## 3 ...

74 sym R (5545 sym/17 pcs) 5 img

Arima with Neuron

26.06.2020

Kết nối dữ liệu library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(readxl) setwd("c:/Users/Admin/Desktop/DuAnR/ARIMA") dulieu <-read_excel("vn...

193 sym R (11386 sym/70 pcs) 10 img

Dừng + Mùa + Xu hướng

11.07.2020

Kết nối dữ liệu setwd("d:/DATA2020/PaerScopus/Von_Quy_GDP") library(readxl) dulieu <-read_excel("data.ardl.1.xlsx") #dulieu <-data.frame(dulieu) head(dulieu) ## # A tibble: 6 x 20 ## Imputation_ TT YEAR QUY Time GDP LnGDP TI IG LnIG IP ## <dbl> <dbl> <dbl> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <d...

241 sym R (20509 sym/50 pcs) 5 img

Tinh Toan SME

30.07.2020

Kết nối data options(scipen=999) library(readxl) setwd("d:/DATA2020/HuongGian_FindModel") dulieu <-read_excel("data.editor.SME.xlsx") head(dulieu) ## # A tibble: 6 x 36 ## Year Firm NHOM NS LnNS Labor LnLab IMS LnIMS ShortASS_old ## <dbl> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <chr> <dbl> <dbl> ## 1 2015 Kiml~ 1...

75 sym R (33607 sym/40 pcs)

Thống Kê Mô Tả

30.07.2020

Kết nối dữ liệu options(scipen=999) library(readxl) setwd("d:/DATA2020/HuongGian_FindModel") dulieu <-read_excel("data.editor.SME.xlsx") head(dulieu) ## # A tibble: 6 x 36 ## Year Firm NHOM NS LnNS Labor LnLab IMS LnIMS ShortASS_old ## <dbl> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <chr> <dbl> <dbl> ## 1 2015 Kiml...

1127 sym R (5322 sym/85 pcs) 24 img

du bao time serial

03.08.2020

1. Kết nối dữ liệu library(readxl) setwd("d:/DATA2020/arimaVSholtwiner") dulieu <-read_excel("dubao.xlsx") dulieu <-ts(dulieu,star=c(2010,10), frequency = 12) head(dulieu) ## Month Quy Time Total Revenues Rev Rev2 ## [1,] 1317427200 1317427200 88 0 0 0 ## [2,] 1320105600 1320105600 79 ...

116 sym R (21680 sym/111 pcs) 12 img

kiem dinh arima

09.08.2020

1. Kết nối dữ liệu library(AER) ## Loading required package: car ## Loading required package: carData ## Loading required package: lmtest ## Loading required package: zoo ## ## Attaching package: 'zoo' ## The following objects are masked from 'package:base': ## ## as.Date, as.Date.numeric ## Loading required package: sandwich ## ...

179 sym R (12242 sym/75 pcs) 11 img

dữ liệu ngành thuỷ sản

24.01.2021

Kết nối dữ liệu library(utf8) library(showtext) ## Warning: package 'showtext' was built under R version 4.0.3 ## Loading required package: sysfonts ## Warning: package 'sysfonts' was built under R version 4.0.3 ## Loading required package: showtextdb ## Warning: package 'showtextdb' was built under R version 4.0.3 showtext_auto() font...

164 sym R (3964 sym/12 pcs) 4 img

Ve do thi Nen

25.01.2021

Tải dữ liệu setwd("d:/DATA2021/CandleStick.Chart") dulieu <-read.csv("stock.grayscale.csv") head(dulieu) ## Date Open High Low Close Volume ## 1 1/22/2021 32.81 34.99 32.80 34.45 17,121,340 ## 2 1/21/2021 32.59 33.01 30.75 31.94 28,642,420 ## 3 1/20/2021 37.17 37.18 33.30 35.35 19,223,740 ## 4 1/19/2021 40.85 40.98 37.8...

134 sym R (2233 sym/10 pcs) 4 img