创建一个重复的字母列表，跳过所有其他字符

Question

我正在尝试在R中创建一个character列表：

[a, a, c, c, e, e, ..., y, y]

但我能够实现的最接近的事情是numeric列表，其中包含letters列表中字符的索引：

[1, 1, 3, 3, 5, 5,..., 25, 25]

使用：

rep(seq(1, 26, 2), each = 2)

有没有办法可以用letters中的相应字符替换列表中的元素？或者甚至是实现这一结果的更好方法？