Как округлить и добавить новые столбцы в таблицу данных?

Question

Я новичок в R. Пожалуйста, помогите мне с проблемой ниже.

Мой data.table выглядит следующим образом -

Я хочу сделать некоторые вычисления только для столбцов si c и naics. Мне нужно добавить еще четыре новых столбца в data.table, а именно TwoDigitSi c, ThreeDigitSi c, TwoDigitNaics и ThreeDigitNaics. Чтобы сделать это TwoDi git, разделите три значения di git на 10 и четыре значения di git на 100 и так далее. также я не хочу использовать round (x). Это должен быть floor (x).

Пример кода для Data.table: - библиотека (readxl) библиотека (data.table) библиотека (xlsx) библиотека (openxlsx)

uk = read.csv("C:\\Users\\talgotra\\Desktop\\CE Count\\latest\\rawDD_monthly_UK40.csv")

data = as.data.table(uk)

Вывод должен быть как -

Answer 1

Попробуйте это:

data$TwoDigitSic <- as.numeric(substr(Sic, 1, 2))
data$ThreeDigitSic <- as.numeric(substr(Sic, 1, 3))
data$TwoDigitNaics <- as.numeric(substr(Naics, 1, 2))
data$ThreeDigitNaics <- as.numeric(substr(Naics, 1, 3))