Publications by Batbileg

finalexam

06.01.2025

#install.packages("wooldridge") #install.packages("lmtest") #install.packages("sandwich") C7.1 library(wooldridge) data("sleep75") data(sleep75) model <- lm(sleep ~ totwrk + educ + age + agesq + male , data = sleep75) summary(model) ## ## Call: ## lm(formula = sleep ~ totwrk + educ + age + agesq + male, data = sleep75) ## ## Residuals: ## M...

320 sym R (64565 sym/199 pcs) 2 img

Publish Document

12.12.2024

library(wooldridge) 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(stargazer) ## ## Please cite as: ## Hlavac, Marek (2022). stargazer: Well-Formatted Re...

609 sym R (5936 sym/19 pcs) 2 img

Publish Document

05.12.2024

install.packages("devtools") ## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.4' ## (as 'lib' is unspecified) install.packages("lmtest") ## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-library/4.4' ## (as 'lib' is unspecified) install.packages("sandwich") ## Installing package into '/cloud/lib/x86_64-pc-linux-gnu-libr...

29 sym R (6368 sym/26 pcs)

Document

28.11.2024

# Install and load required packages if (!require(wooldridge)) install.packages("wooldridge") ## Loading required package: wooldridge if (!require(lmtest)) install.packages("lmtest") ## Loading required package: lmtest ## Loading required package: zoo ## ## Attaching package: 'zoo' ## The following objects are masked from 'package:base': ## ## ...

44 sym R (5505 sym/41 pcs)

case7

14.11.2024

library(wooldridge) data("wage2") #(i) model1 <- lm(log(wage) ~ educ + exper + tenure + married + black + south + urban, data = wage2) summary(model1) ## ## Call: ## lm(formula = log(wage) ~ educ + exper + tenure + married + black + ## south + urban, data = wage2) ## ## Residuals: ## Min 1Q Median 3Q Max ## -1.98069 ...

15 sym R (6190 sym/12 pcs)

batbileg

07.11.2024

##Part1 # Load the wooldridge package and data library(wooldridge) data("vote1") # Estimate the model with interaction term model <- lm(voteA ~ prtystrA + expendA + expendB + I(expendA * expendB), data = vote1) summary(model) ## ## Call: ## lm(formula = voteA ~ prtystrA + expendA + expendB + I(expendA * ## expendB), data = vote1) ## ## Res...

15 sym R (4264 sym/12 pcs)

midterm

31.10.2024

Chapter2 C9 (i) From the data in COUNTYMURDERS, 1996, there were 1051 counties with zero murders.There were 31 counties with at least one execution. The largest number of executions was 3. ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'pack...

3701 sym Python (23095 sym/110 pcs) 4 img

Publish Document

24.10.2024

library(wooldridge) data("discrim", package = "wooldridge") #1 model_1 <- lm(log(psoda) ~ prpblck + log(income) + prppov, data = discrim) summary(model_1) ## ## Call: ## lm(formula = log(psoda) ~ prpblck + log(income) + prppov, data = discrim) ## ## Residuals: ## Min 1Q Median 3Q Max ## -0.32218 -0.04648 0.00651 0.042...

28 sym R (4482 sym/12 pcs)

Publish Document

23.10.2024

if (!require(wooldridge)) { install.packages("wooldridge")} ## Loading required package: wooldridge library(wooldridge) data("discrim") #(i): mean_prpblck <- mean(discrim$prpblck, na.rm = TRUE) sd_prpblck <- sd(discrim$prpblck, na.rm = TRUE) mean_income <- mean(discrim$income, na.rm = TRUE) sd_income <- sd(discrim$income, na.rm = TRUE) cat("Me...

20 sym R (7310 sym/17 pcs)

Document

17.10.2024

library(wooldridge) data("wage2") #1C6 (i) model_i <- lm(IQ ~ educ, data = wage2) summary(model_i) ## ## Call: ## lm(formula = IQ ~ educ, data = wage2) ## ## Residuals: ## Min 1Q Median 3Q Max ## -50.228 -7.262 0.907 8.772 37.373 ## ## Coefficients: ## Estimate Std. Error t value Pr(>|t|) ## (Intercept...

12 sym R (4414 sym/9 pcs)