Question

如何在返回ggplot对象的函数中的geom_text中生成的文本上更改字体/字体？在下面的示例中，我将在p1对象中将字体更改为“ Tahoma”。

learn1 <- makeRegrTask(data = train.all , target= "resp", weights = weights1)
lrn.xgb <- makeLearner("regr.xgboost", predict.type = "response")
lrn.xgb$par.vals <- list( objective="reg:squarederror", eval_metric="error", nrounds=300, gamma=0, booster="gbtree", max.depth=6)

lrn.xgb.bag = makeBaggingWrapper(lrn.xgb, bw.iters = 50, bw.replace = TRUE,  bw.size = 0.85, bw.feats = 1)
lrn.xgb.bag <- setPredictType(lrn.xgb.bag, predict.type="se")
mb = mlr::train(lrn.xgb.bag, learn1)

fimp1 <- getFeatureImportance(mb)

Answer 1

尝试使用theme()选项，即添加p <- p + theme(text=element_text(family="Tahoma"))

从ggplot对象更改geom_text字体

1 个答案: