подготовка картинки к публикации

iMissile · Jan 29, 2018 · 9e8e4d2 · 9e8e4d2
1 parent bddfcdc
commit 9e8e4d2
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/85 emp_attrition/attrition_cox_demo.R b/85 emp_attrition/attrition_cox_demo.R
@@ -52,11 +52,12 @@ ggsurvplot(fit, data=hr_data, legend.labs=c("Female","Male"),
 cfit <- coxph(Surv(tenure, event) ~ OverTime, data=hr_data)
 summary(cfit)
 fit <- survfit(cfit, newdata=data.frame(OverTime=c("Yes", "No"), stringsAsFactors=FALSE))
-ggsurvplot(fit, data=hr_data, legend.labs=c("Yes","No"),
+ggsurvplot(fit, data=hr_data, legend.labs=c("Ïåðåðàáîòêà","Íîðìà"),
            conf.int=TRUE, palette="Dark2", 
-           censor=FALSE, surv.median.line="hv")
-
-
+           censor=FALSE, surv.median.line="hv",
+           title="Ãðàôèê äîæèòèÿ (àíàëèç óâîëüíåíèé)",
+           xlab="Êîë-âî ìåñÿöåâ äî óâîëüíåíèÿ",
+           ylab="Âåðîÿòíîñòü äîðàáîòêè äî óêàçàííîãî ñðîêà")
 
 
 jsonedit(fit)