Publications by LTKHanh

Document

19.07.2024

1 Phần mở đầu 1.1 Lý do chọn đề tài Thế giới đang thay đổi với tốc độ chóng mặt do sự phát triển không ngừng của khoa học kỹ thuật và xu hướng toàn cầu hóa. Điều này dẫn đến nhu cầu nhân lực ở các ngành nghề cũng không ngừng biến đổi. Một số ngành nghề ...

41506 sym R (25471 sym/138 pcs) 17 img

Tiểu luận Phân tích dữ liệu định tính

13.06.2024

1 Giới thiệu bộ dữ liệu library(DT) library(ggplot2) library(readxl) S <- read_excel("C:/Users/ACER/Downloads/Student.xlsx") datatable(S) 2 Thống kê mô tả 2.1 Thống kê mô tả cho 1 biến 2.1.1 “Department” - Ngành học mà sinh viên lựa chọn # Biểu đồ ggplot(S,aes(Department)) + geom_bar(color ="blac...

1443 sym R (24329 sym/54 pcs) 9 img

TIÊU LUẬN

13.06.2024

library(DT) library(readxl) S <- read_excel("C:/Users/ACER/Downloads/Student.xlsx") datatable(S) Ngành học có liên quan tới giới tính Ngành học có liên quan tới điểm lớp 12 Ngành học có liên quan tới điểm đại học Ngành học có liên quan tới thời gian dành cho việc học hàng ngày Ngành học c...

2345 sym R (924 sym/11 pcs)

TIẾU LUẬN PHÂN TÍCH DỮ LIỆU ĐỊNH TÍNH

13.06.2024

library(DT) library(readxl) S <- read_excel("C:/Users/ACER/Downloads/Student.xlsx") datatable(S) Tình trạng tài chính có khiến cho sinh viên bị áp lực căng thẳng không? sở thích có bị ảnh hưởng bởi giới tính không? sở thích khiến cho sinh viên tham gia vào các kênh truyền thông để tìm hiểu ...

3011 sym R (1100 sym/13 pcs)

1/6/2024

02.06.2024

Giới thiệu bộ dữ liệu Mô tả biến: SportsCards chứa dữ liệu từ 148 nhà giao dịch được chọn ngẫu nhiên đã tham dự một triển lãm thẻ giao dịch ở Orlando, Florida, vào năm 1998. Các nhà giao dịch được trao ngẫu nhiên một của hai bộ sưu tập thể thao, nói tốt A hoặc B tốt...

3199 sym R (2032 sym/26 pcs) 2 img

51_55

31.05.2024

2.6.2. Các liên kết từng phần Với mỗi k = 1, 2,…, K, ta có K bảng ngẫu nhiên 2 chiều 𝐼 × 𝐽, dạng : \[ \begin{array}{|c|cccc|} \hline \text{X} & & \text{Y} \\ & {B_1} & {B_2} & {...} & {B_J}& \\ \hline {A_1}\ & {n_{11k}} & {n_{12k}} & {...} & {n_{1Jk}} \\ {A_2}\ & {n_{21k}} & {n_{22k}} & {...} & {n_{2Jk}}...

38884 sym

51_55

31.05.2024

2.6.2. Các liên kết từng phần Với mỗi k = 1, 2,…, K, ta có K bảng ngẫu nhiên 2 chiều 𝐼 × 𝐽, dạng : \[ \begin{array}{|c|cccc|} \hline \text{X} & & \text{Y} \\ & {B_1} & {B_2} & {...} & {B_J}& \\ \hline {A_1}\ & {n_{11k}} & {n_{12k}} & {...} & {n_{1Jk}} \\ {A_2}\ & {n_{21k}} & {n_{22k}} & {...} & {n_{2Jk}}...

38890 sym

51_55

31.05.2024

2.6.2. Các liên kết từng phần Với mỗi k = 1, 2,…, K, ta có K bảng ngẫu nhiên 2 chiều 𝐼 × 𝐽, dạng : \[ \begin{array}{|c|cccc|} \hline \text{X} & & \text{Y} \\ \hline & {B_1} & {B_2} & {...} & {B_J}& \\ \hline {A_1}\ & {n_{11k}} & {n_{12k}} & {...} & {n_{1Jk}} \\ {A_2}\ & {n_{21k}} & {n_{22k}} & {...} & {n...

30165 sym

25072003

25.07.2023

library(AER) data("Affairs") h <- Affairs x <- h$rating y <- h$age z <- h$occupation regression_heteroskedasticity_forecast <- function(data, y_var, x_var) { # Chạy hồi quy tuyến tính model <- lm(formula = paste(y_var, "~", x_var), data = data) # Kiểm định tương quan cor <- cor.test(x,y) # Dự báo giá trị c�...

10 sym R (1788 sym/7 pcs)

25072023

25.07.2023

library(AER) data("Affairs") h <- Affairs x <- h$rating y <- h$age z <- h$occupation regression_heteroskedasticity_forecast <- function(data, y_var, x_var) { # Chạy hồi quy tuyến tính model <- lm(formula = paste(y_var, "~", x_var), data = data) # Kiểm định tương quan cor <- cor.test(x,y) # Vẽ đồ thị plot...

12 sym R (1834 sym/8 pcs) 4 img