Publications by Nguyen Chi Dung

Quantitative Finance: Portfolio Theory (P1)

23.01.2021

Portfolios with Three Risky Assets Xét một danh mục đầu tư (Portfolio) gồm ba tài sản là A, B và C. Kí hiệu \(R_i\) (\(i = A, B, C\)) là lợi tức tương ứng của ba tài sản và giả định rằng các lợi tức là biến ngẫu nhiên (Random Variable) thỏa mãn: \[R_{i}\sim N(\mu_i,\sigma_i^2)\] Ngoài ra v�...

43480 sym R (9652 sym/35 pcs) 4 img 7 tbl

Quantitative Finance: Portfolio Theory (Part 2)

30.01.2021

Portfolio Theory Again Portfolio Theory đã được mô tả và giải thích trực quan trong trong phần 1 tập trung vào hai vấn đề chính: Những tính toán ban đầu liên quan đến lí thuyết này bằng ngôn ngữ ma trận (lợi tức và rủi ro). Tìm danh mục đầu tư mà rủi ro là bé nhất (Global Minim...

39175 sym R (11902 sym/31 pcs) 5 img 6 tbl

Quantitative Finance: Bayesian Portfolio Selection

28.02.2021

Challange of Classical Portfolio Selection Markowitz’s 1952 paper set the foundations for what is now popularly referred to as Modern Portfolio Theory (MPT) and had a profound impact on the financial industry. Individual security selection lay at the heart of the standard investment practice until then. Afterward, the focus shifted toward diver...

14652 sym R (6823 sym/5 pcs) 1 tbl

Bayesian Modelling with Rstan

28.02.2021

An Example # https://www.google.com/search?q=rstan+example&ei=6ZQ7YMvdJKaQr7wP84mfoA4&start=10&sa=N&ved=2ahUKEwiL9uWn0ozvAhUmyIsBHfPEB-QQ8tMDegQIBRA0&biw=1653&bih=902 #--------------------------------- # Prepare data for stan program #--------------------------------- N <- nrow(trees) x <- trees$Height y <- trees$Volume stan_data <- lis...

2917 sym R (2897 sym/12 pcs) 2 img

Hanoi Map Only Using ggplot2

07.04.2021

R Codes #======================== # Prepare data #======================== # Clear workspace: rm(list = ls()) # Load some R packages: library(tidyverse) library(stringi) # Get geo-spatial data by district level for all provinces: vietnam_dis <- raster::getData("GADM", country = "Vietnam", level = 2) # Only select Hanoi: ha...

4139 sym R (2455 sym/1 pcs) 2 img

Use Google Fonts

24.03.2021

Introduction In many cases, using non-standard fonts in R graphs is not an easy task, especially for PDF devices. Also, R users may have installed various fonts in their systems, but for many graphics devices there is no direct and portable way to make use of those fonts. The extrafont package developed by Winston Chang is one nice solution to th...

3097 sym R (964 sym/3 pcs) 1 img

Quantitative Finance: Compare Investment Strategies Using Backtesting

25.03.2021

R Codes and Results #===================================================== # Reference: https://www.pfaffikus.de/books/jwex2/ #===================================================== # Clear workspace: rm(list = ls()) # Import data: library(tidyverse) read_csv("C:/Users/Admin/Documents/CafeF.HSX.Upto27.01.2021.csv") -> raw_data # Se...

6339 sym R (4133 sym/1 pcs) 1 img

Fill in Missing Values with Previous Value: Case of VES (Vietnam Enterprise Survey) Data Set

01.04.2021

Our Problem Các ngành kinh tế tại Việt Nam được phân chia theo Quyết định số 27/2018/QĐ-TTg với mã ngành tương ứng. Bộ mã ngành này được sử dụng trong nhiều báo cáo cũng như nghiên cứu kinh tế. Nhiều bộ dữ liệu về doanh nghiệp như VES (Vietnam Enterprise Survey), SME (Medium Enterp...

15393 sym R (3877 sym/16 pcs) 1 img 6 tbl

Data Pre-processing: Case of VES (Vietnam Enterprise Survey)

02.04.2021

Our Problem Tiền xử lí số liệu (Data Pre-processing) là một khâu mất nhiều thời gian. Post này sử dụng bộ dữ liệu VES - Vietnam Enterprise Survey (download tại đây). Giải nén và đọc bộ dữ liệu này: #=================================================================== # Data Processing Project with ...

15487 sym R (5155 sym/28 pcs) 2 img 7 tbl

Population Pyramids of Vietnam in 1999 (Minnesota Population Center)

06.04.2021

R Codes #=========================== # Pepare data for ploting #=========================== # Import Data: rm(list = ls()) library(readstata13) read.dta13("ipumsi_00002.dta") -> ipumsi_raw # The dataset of 2368167 observations and 92 columns. # Prepare data for ploting: library(tidyverse) ipumsi_raw %>% mutate_if(is.facto...

6634 sym R (4380 sym/1 pcs) 1 img