Добавьте нулевое дополнение к числам в столбце, используя str_pad в пакете строк

Я хочу использовать функцию string str_pad, чтобы создать столбец в нужном мне формате, который включает заполнение нулями чисел в столбце «Код» до 3 цифр.

Я запустил этот код:

Animals %>%
gather(most_common, cnt, M:OG) %>% 
group_by(name) %>% 
slice(which.max(cnt)) %>%
arrange(code)

В результате получилась следующая табличка:

Code      Name       most_common
32       Monkey        Africa
33       Wolf          Europe
34       Tiger         Asia
35       Godzilla      Asia
#With 1 234 more rows

Я доволен своим кодом выше. Однако, поскольку я собираюсь объединить этот df позже, мне нужно, чтобы столбец «Код» состоял из трех цифр с нулевым дополнением (т.е. в формате «nnn» / «032»), как это:

Code      Name       most_common
032       Monkey        Africa
033       Wolf          Europe
034       Tiger         Asia
035       Godzilla      Asia
#With 1 234 more rows

Я запустил string str_pad($code, $3, $0), но это не работает. Думаю, там что-то не так. Должен ли я запускать этот код в любом месте своего фрагмента или с помощью %>%?

Альтернатива: df %>% mutate(Code = paste0(0,Code)).

TarJae 23.07.2022 18:30

Разве все ссылки на пакет "string" не должны быть "stringr"? Я бы просто отредактировал, но поскольку OP не включает пример сбоя, неясно, что пошло не так. Просьба уточнить.

merv 24.07.2022 01:10
Стоит ли изучать PHP в 2023-2024 годах?
Стоит ли изучать PHP в 2023-2024 годах?
Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией
В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.
Приемы CSS-макетирования - floats и Flexbox
Приемы CSS-макетирования - floats и Flexbox
Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...
Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest
В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...
Концепция локализации и ее применение в приложениях React ⚡️
Концепция локализации и ее применение в приложениях React ⚡️
Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...
Пользовательский скаляр GraphQL
Пользовательский скаляр GraphQL
Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...
4
2
12 731
3
Перейти к ответу Данный вопрос помечен как решенный

Ответы 3

Ответ принят как подходящий

Возможное решение:

library(tidyverse)

df <- read.table(text = "Code      Name       most_common
32       Monkey        Africa
33       Wolf          Europe
34       Tiger         Asia
35       Godzilla      Asia", header = T)

df %>% 
  mutate(Code = str_pad(Code, width = 3, pad = "0"))

#>   Code     Name most_common
#> 1  032   Monkey      Africa
#> 2  033     Wolf      Europe
#> 3  034    Tiger        Asia
#> 4  035 Godzilla        Asia

Спасибо @PaulS. Это сработало, когда я использовал mutate(Code = str_pad(Code, width = 3, pad = "0")) вместе с первым упомянутым кодом. :)

Henry Oufh 23.07.2022 18:11

В base R мы можем использовать sprintf

df1$Code <- sprintf("%03d", df1$Code)

Другим вариантом может быть использование formatC с «d» для целого числа и флаг «0» перед предшествующим нулем, например:

df$Code <- formatC(df$Code, width = 3, format = "d", flag = "0")
df
#>   Code     Name most_common
#> 1  032   Monkey      Africa
#> 2  033     Wolf      Europe
#> 3  034    Tiger        Asia
#> 4  035 Godzilla        Asia

Created on 2022-07-23 by the reprex package (v2.0.1)

Другие вопросы по теме