У меня есть таблица с именем LOAN, содержащая столбец с именем RATE, в котором наблюдения даны в процентах, например, 14,49%, как я могу отформатировать таблицу, чтобы отредактировать все значения в ставке, а% удалить из записей, чтобы я мог использовать функцию графика на нем. Я попытался использовать strsplit.
strsplit(LOAN$RATE,"%")
но получил ошибку несимвольного аргумента
Элементы, которые кажутся символьными при печати, но для которых R считает иначе, обычно являются объектами факторных классов. Я также предполагаю, что вам не понравится вывод списка, который вернет strsplit. Пытаться:
gsub( "%", "", as.character(LOAN$RATE) n)
Факторы, которые кажутся числовыми, также могут быть источником путаницы:
> factor("14.9%")
[1] 14.9%
Levels: 14.9%
> as.character(factor("14.9%"))
[1] "14.9%"
> gsub("%", "", as.character(factor("14.9%")) )
[1] "14.9"
Это особенно сбивает с толку, поскольку print.data.frame удаляет кавычки:
> data.frame(z=factor("14.9%"), zz=factor(14.9))
z zz
1 14.9% 14.9
gsub("%", "", paste(LOAN$RATE)) для нас, ленивых машинисток. Я сказал лень? Я имел в виду эффективное.
- person Joshua Ulrich; 06.02.2013
character. Помощь?
- person zsad512; 20.01.2018
data$fundraising_goal <- as.numeric(gsub("\\$", "", data$fundraising_goal)), но это выдает предупреждение: NA введены принудительно, и я не уверен, где/почему...
- person zsad512; 20.01.2018
lapply с вспомогательной функцией всегда доступно в качестве стратегии. Есть много проработанных примеров. Лучшей стратегией, чем отрицание, было бы задать вопрос.
- person IRTFM; 20.01.2018
Этого можно добиться с помощью глагола mutate из пакета tidyverse. Что, на мой взгляд, более читабельно. Итак, чтобы проиллюстрировать это, я создаю набор данных под названием LOAN с акцентом на RATE, чтобы имитировать описанную выше проблему.
library(tidyverse)
LOAN <- data.frame("SN" = 1:4, "Age" = c(21,47,68,33),
"Name" = c("John", "Dora", "Ali", "Marvin"),
"RATE" = c('16%', "24.5%", "27.81%", "22.11%"),
stringsAsFactors = FALSE)
head(LOAN)
SN Age Name RATE
1 1 21 John 16%
2 2 47 Dora 24.5%
3 3 68 Ali 27.81%
4 4 33 Marvin 22.11%
В дальнейшем mutate позволяет изменять содержимое столбца, gsub выполняет желаемую замену (из % на "") и преобразует столбец RATE в значение numeric, сохраняя поток очистки данных отслеживаемым.
LOAN <- LOAN %>% mutate(RATE = as.numeric(gsub("%", "", RATE)))
head(LOAN)
SN Age Name RATE
1 1 21 John 16.00
2 2 47 Dora 24.50
3 3 68 Ali 27.81
4 4 33 Marvin 22.11
str_replace_all("%|=|:", "", RATE) вместо gsub(), и все будет хорошо. Обратите внимание, что для продолжения добавления шаблонов все, что вам нужно сделать, это добавить | и нежелательный символ рядом с ним. Для некоторых специальных символов, таких как "*, $", вам нужно экранировать каждый, добавляя \. Например, $ станет "\$", а затем добавленный выше шаблон выглядит примерно как str_replace_all("%|=|:|\$", "", RATE).
- person odunayo12; 24.10.2020
Пытаться:
LOAN$RATE <- sapply(LOAN$RATE, function(x), gsub("%", "", x))
