小编Par*_*ark的帖子

例如，有字符x = "AAATTTGGAA"。

我想要实现的是，从，由连续字母x分割， 。x"AAA", "TTT", "GG", "AA"

然后，每个块的唯一字母是"A", "T", "G", "A"，因此预期输出是ATGA。

我应该如何得到这个？

我正在尝试使用 R 中的“mlr”库和 iris 数据集上的“c50”算法（使用 F1 分数作为指标）：

library(mlr)
library(C50)
data(iris)

zooTask <- makeClassifTask(data = iris, target = "Species")
forest <- makeLearner("classif.C50")

forestParamSpace <- makeParamSet(
makeIntegerParam("minCases", lower = 1, upper = 100))


randSearch <- makeTuneControlRandom(maxit = 100)


cvForTuning <- makeResampleDesc("CV", iters = 5,  measures = f1)


tunedForestPars <- tuneParams(forest, task = zooTask,
resampling = cvForTuning,
par.set = forestParamSpace,
control = randSearch)



tunedForestPars

但这会导致以下错误：

Error in makeResampleDescCV(iters = 5, measures = list(id = "f1", minimize = FALSE,  : 
  unused argument (measures = …

我有一个名为 crashes_deaths_injuries_TA_pop 的数据框，如下所示：

我试图用条形图显示数据，但是，x 轴的比例混乱，我不知道如何。我知道这一定很容易，但我是编码新手，所以我很挣扎。

这是我的条形图代码：

ggplot(crashes_deaths_injuries_TA_pop, aes(x = reorder(TA_name, Population), y = Population, fill = Population)) +
  geom_col(alpha = 0.7) +
  scale_fill_distiller(palette = "Reds", direction = 1) +
  coord_flip() +
  labs(x = "", y = "Population", fill = "Population",
       title = "Populations of South Island TA's | 2018",
       caption = "Data: Census 2018, StatsNZ") +
  theme_minimal() +
  theme(legend.position = "none") 

我还想知道如何在每个 TA_name 的每个栏末尾添加人口作为数字

我正在尝试反转 Y 轴的值。我基本上希望 Y 轴随着上升而减小，因此应该是 16，而不是 24。我该怎么做？

ggplot(data=data_diff, aes(Sum.of.Diff, Sum.of.Against.Total) + 
geom_point(alpha=1) + 
ggtitle("Data Diff") + 
geom_label_repel(data=subset(data_diff, Sum.of.Against.Total> 0 | Sum.of.Diff > 0 | Sum.of.Diff < 0), aes(label=Name), box.padding = 0.5, point.padding = .11, segment.color = 'black') + 
xlab("Sum of Diff") + ylab("Sum of Against Stats Total")

示例图：

这是我的数据集：

                    Name Sum.of.Against.Total Sum.of.Diff
1                Aurorus                26.00      185.66
2               Parasect                25.00      155.66
3               Leavanny                25.00      115.66
4              Abomasnow                25.00      115.66
5               Frosmoth                24.50      115.66
6              Rhyperior                24.25      115.66
7                  Golem                24.25      115.66 …