Есть ли у R такие операторские операции, как Perl qw ()?
3610 просмотра
6 ответа
Кто-нибудь знает, если у R есть такие котировочные операторы, как Perl qw()
для генерации векторных векторов?
Ответы (6)
23 плюса
Нет, но вы можете написать сами:
q <- function(...) {
sapply(match.call()[-1], deparse)
}
И просто показать это работает:
> q(a, b, c)
[1] "a" "b" "c"
Автор: hadley
Размещён: 31.07.2009 07:37
11 плюса
Я добавил эту функцию в свой файл Rprofile.site (см., ?Startup
Если вы не знакомы)
qw <- function(x) unlist(strsplit(x, "[[:space:]]+"))
qw("You can type text here
with linebreaks if you
wish")
# [1] "You" "can" "type" "text"
# [5] "here" "with" "linebreaks" "if"
# [9] "you" "wish"
Автор: flodel
Размещён: 04.04.2012 01:56
8 плюса
Популярный пакет Hmisc предлагает функцию Cs()
для этого:
library(Hmisc)
Cs(foo,bar)
[1] "foo" "bar"
который использует аналогичную стратегию для ответа хасли:
Cs
function (...)
{
if (.SV4. || .R.)
as.character(sys.call())[-1]
else {
y <- ((sys.frame())[["..."]])[[1]][-1]
unlist(lapply(y, deparse))
}
}
<environment: namespace:Hmisc>
Автор: patrickmdnet
Размещён: 28.06.2011 11:17
5 плюса
3 плюса
Еще проще:
qw <- function(...){
as.character(substitute(list(...)))[-1]
}
Автор: Ben Rollert
Размещён: 15.05.2015 10:20
0 плюса
фрагмент, работающий для случая, когда вектор передается, например, v=c('apple','apple tree','apple cider'). You would get c('"apple"','"apple tree"','"apple cider"')
quoted = function(v){
base::strsplit(paste0('"', v, '"',collapse = '/|||/'), split = '/|||/',fixed = TRUE)[[1]]
}
Автор: Jerry T
Размещён: 05.11.2018 04:29
Вопросы из категории :
- r Как получить доступ к последнему значению в векторе?
- r Пакеты оптимизации для R
- r Есть ли у R такие операторские операции, как Perl qw ()?
- r Библиотека / инструмент для рисования тройных / треугольных графиков
- r Участки без заголовков / надписей в R
- r Расчет скользящей средней
- r Режим Emacs ESS - вкладка для области комментариев
- r Преобразование данных из многих строк во многие столбцы
- r Проверить, содержит ли вектор данный элемент
- r Поиск всех позиций для нескольких элементов в векторе
- perl Как определить, имеет ли переменная число в Perl?
- perl Как я могу проверить STDIN без блокировки в Perl?
- perl Как выполнить подстановку Perl для строки, сохранив оригинал?
- perl Какой самый простой способ установить отсутствующий модуль Perl?
- perl Что происходит с Perl 6?
- perl Как запустить интерактивную консоль для Perl?
- perl Как я могу создать XML из Perl?
- perl Какой лучший движок XSLT для Perl?
- perl Что "select ((select (s), $ | = 1) [0])" делает в Perl?
- perl Как я могу получить длину строки в Perl?