alex/Enyo
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Tinkering

Browse Source
This commit is contained in:
Alex Gebben Work 2026-03-03 14:27:55 -07:00
parent 11afec9e1c
commit ea6fe16b04
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Scale.r
View File

@ -18,8 +18,9 @@ DATA <- cbind(CAP,EMP,PEAK_CONST,DATE) %>% as.matrix %>% as_tibble
DATA$NAMES <- NAMES DATA$NAMES <- NAMES
colnames(DATA ) <- c("Capacity","Emp","Peak_Const","Report_Year","Plant") colnames(DATA ) <- c("Capacity","Emp","Peak_Const","Report_Year","Plant")
DATA
feols(log(Emp)~log(Capacity),DATA %>% filter(Plant!='Homer')) feols(log(Emp)~log(Capacity),DATA %>% filter(Plant!='Homer'))
feols(log(Emp)~log(Capacity),DATA %>% filter(Plant!='Homer'))
feols(log(Emp)~log(Capacity),DATA) feols(log(Emp)~log(Capacity),DATA)
feols(log(Peak_Const)~log(Capacity)+Report_Year,DATA) feols(log(Peak_Const)~log(Capacity)+Report_Year,DATA)