Создайте последовательность, такую ​​как 112123123412345

В принципе, я хочу сгенерировать последовательность, скажем:

n равно 2, последовательность будет 112
n равно 3, последовательность 112123
n равно 5, последовательность – 112123123412345

Я придумал решение

n=5 seq=1 for (i in 2:n){ seq=c(seq,rep(1:n,len=i)) } 

Мне интересно, есть ли способ сделать это без цикла?

Порядок использования:

 > sequence(1:5) [1] 1 1 2 1 2 3 1 2 3 4 1 2 3 4 5 

Вот одна из возможностей:

 n<-5 unlist(lapply(1:n,function(x) 1:x)) ## [1] 1 1 2 1 2 3 1 2 3 4 1 2 3 4 5 

Он будет делать что-то вроде:

 do.call('c', sapply(1:5, seq, from = 1)) # [1] 1 1 2 1 2 3 1 2 3 4 1 2 3 4 5 

Я неправильно понял вопрос как «как создать эту раздражающую последовательность головоломок», которая идет 1,11,21,1112,3112, … :-). Поэтому я подумал, что могу написать решение.

 puzseq<-function(seqlen) { theseq<- list(1) for( j in 2:seqlen) { thetab<-table(theseq[[j-1]]) theseq[[j]]<-unlist( sapply( 1:length(thetab), function(k) c(thetab[k], as.numeric(names(thetab)[k])) )) } return(theseq) } 
  • Есть ли способ `source ()` и продолжить после ошибки?
  • Для каждой строки возвращаем имя столбца наибольшего значения
  • Каковы форматы «стандартной четкой даты»?
  • Напишите много файлов в цикле for
  • R применяется с несколькими параметрами
  • Почему используется `<< -` нахмурился и как я могу его избежать?
  • Получить «встроенные nul (s), найденные во вводе» при чтении csv, используя read.csv ()
  • Импорт CSV-файла в R-числовые значения, считанные как символы
  • Как назначить значения динамическим именам переменных
  • Выбор только числовых столбцов из кадра данных
  • Преобразовать значения в столбце в имена строк в существующем кадре данных в R
  • Interesting Posts

    Каково время жизни статической переменной в C ++-функции?

    Получение списка контактов из hotmail gmail yahoo в java?

    Как легко и непрерывно контролировать температуру процессора, используя только «датчики» (без виджета gui)?

    Разрешение неподписанных Java-приложений на всех сайтах

    Как проверить целостность видеофайла (avi, mpeg, mp4 …)?

    Двойная загрузка Linux / Windows 7

    Беспроводное подключение к Интернету подключается, но интернет не работает (пакеты не получены). Проводной

    Изменение темы во время выполнения

    Невозможно уменьшить доступ к тому разделов в Windows

    Код примера Objective-C для HMAC-SHA1

    Передвиньте экранное окно на экране Mac OS X

    Как использовать Bluetooth для подключения двух iPhone?

    Как создать магический квадрат с помощью Windows Forms?

    Какое лучшее место для хранения загруженных изображений, базы данных SQL или файловой системы диска?

    Как использовать cURL в Java?

    Давайте будем гением компьютера.