В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

R language and Statistical data analysis

1000 membersпожаловаться на группу
2019 December 24

A

Andrey in R language and Statistical data analysis
Cocos
for(l in 1:lc_max)  for(pcease in 1:cease)    for(nOnMinI in cycles$n-1){
   p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinI,"vn")]
   for(vergeI in cycles$v-1){  
       p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinI,"v",vergeI)]
       p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinII,"vd",vergeI)]
       p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinI,"vm",vergeI)]
   }
циклов несколько
Сделайте меня развидеть
источник
08:59пожаловаться#1

NN

Nikolai Neustroev in R language and Statistical data analysis
😳
источник
08:59пожаловаться#2

A

Andrey in R language and Statistical data analysis
Наверни еще десяток вложенных циклов
источник
08:59пожаловаться#3

C

Cocos in R language and Statistical data analysis
интересно как их затолкнёте в дататейбл
источник
09:00пожаловаться#4

A

Andrey in R language and Statistical data analysis
Никак ввиду того, что здесь на первый взгляд циклы вообще не нужны
источник
09:01пожаловаться#5

АК

Артём Клевцов in R language and Statistical data analysis
Cocos
for(l in 1:lc_max)  for(pcease in 1:cease)    for(nOnMinI in cycles$n-1){
   p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinI,"vn")]
   for(vergeI in cycles$v-1){  
       p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinI,"v",vergeI)]
       p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinII,"vd",vergeI)]
       p<-p+1; outcome[p,cname:=paste0(pcluster1[[pcease]]["cname"],"l",l,"n",nOnMinI,"vm",vergeI)]
   }
циклов несколько
А теперь расскажи нормально: что было на входе и что надо получить на выходе.
источник
09:01пожаловаться#6

A

Andrey in R language and Statistical data analysis
У меня цикл досчитался. 891 сек.
источник
09:04пожаловаться#7

A

Andrey in R language and Statistical data analysis
Артём Клевцов
paste0("vn", .I)
А так за 1 сек отрабатывает
источник
09:05пожаловаться#8

AS

Alexander Semenov in R language and Statistical data analysis
AnimatedSticker.tgs
(11.42 Кб)
источник
09:53пожаловаться#9

a

aGricolaMZ in R language and Statistical data analysis
Артём Клевцов
Подозреваю, что дело не в R, а в том, что сломан GCC.
Вот это сделай: https://www.cs.cmu.edu/~awb/pub/minix/gcc.test
Если будет ругаться на отсутствие gcc2minix, то можно выполнить сразу ./a.out.
Если скомпилить не даст, из-за libisl, то надо чинить установку GCC в системе.
тогда не было времени доразобраться, но я все еще не знаю, в какую сторону думать
источник
10:27пожаловаться#10

АК

Артём Клевцов in R language and Statistical data analysis
aGricolaMZ
тогда не было времени доразобраться, но я все еще не знаю, в какую сторону думать
Обнови всё, что можно.
sudo apt-get upgrade
sudo apt-get dist-upgrade
источник
10:33пожаловаться#11

АК

Артём Клевцов in R language and Statistical data analysis
Поскольку там бинарные пакеты, то в момент релиза их синхронизируют, так что при полном соотвествии версий релизеым - проблемы быть не должно.
источник
10:34пожаловаться#12

a

aGricolaMZ in R language and Statistical data analysis
Артём Клевцов
Обнови всё, что можно.
sudo apt-get upgrade
sudo apt-get dist-upgrade
по нулям...

agricolamz@agricolamz ~ $ sudo apt dist-upgrade 
Reading package lists... Done
Building dependency tree       
Reading state information... Done
Calculating upgrade... Done
0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded.
agricolamz@agricolamz ~ $ sudo apt-get dist-upgrade
Reading package lists... Done
Building dependency tree       
Reading state information... Done
Calculating upgrade... Done
0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded.
источник
11:14пожаловаться#13

IM

I M in R language and Statistical data analysis
aGricolaMZ
по нулям...

agricolamz@agricolamz ~ $ sudo apt dist-upgrade 
Reading package lists... Done
Building dependency tree       
Reading state information... Done
Calculating upgrade... Done
0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded.
agricolamz@agricolamz ~ $ sudo apt-get dist-upgrade
Reading package lists... Done
Building dependency tree       
Reading state information... Done
Calculating upgrade... Done
0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded.
https://stackoverflow.com/questions/33734143/gcc-unable-to-find-shared-library-libisl-so
Stack Overflow
gcc unable to find shared library libisl.so
I installed gcc version 5.1 locally on a cluster having OS as CentOS where I dont have root access (so i cant use any commands like 'sudo'). (The global gcc version installed is 4.4). I also modifi...
источник
11:18пожаловаться#14

АК

Артём Клевцов in R language and Statistical data analysis
Ну, тогда радикально давай. Дам ссылку, чтобы не копипастить.
https://askubuntu.com/a/26518/150582
Ask Ubuntu
How to choose the default gcc and g++ version?
So I have installed gcc-4.4 and gcc-4.3 (same for g++). Now as far as I remember there is a tool in Ubuntu which sets the symlinks for you if you just tell it which version you want. However it doe...
источник
11:19пожаловаться#15

ГД

Григорий Демин in R language and Statistical data analysis
Philipp Upravitelev
да, кстати. коллеги, подскажите какой-нибудь простой набор операций (допустим, на пяток строк)
на котором можно было бы продемонстрировать профилирование?
а то обычно используют для этого графики ggplot (агрегация + визуализация), но я что-то не хочу их брать %(
Как-то так у меня выглядело:
library(microbenchmark) # библиотека для сравнения скорости работы


# делаем довольно много данных
data(iris) 
long_iris = iris[rep(seq_len(nrow(iris)), 1000), ] 



# генерируем набор случайных индексов для сабсета
set.seed(123)
indices = sample(nrow(long_iris), 10000, replace = TRUE)


# цикл нужен, чтобы не слишком быстро считало - было время запрофилировать
# этой строчке делаем Profile selected lines
for(i in 1:100) long_iris[indices, ]

# без проверки на уникальность row.names
fast_subset = function(df, index){
    res = lapply(df, "[", index)
    class(res) = "data.frame"
    rownames(res) = seq_along(res[[1]]) # нужна, иначе кол-во строк не будет определятся
    res
}
    

# проверям, что одинаковый результат
temp1 = long_iris[indices, ]
temp2 = fast_subset(long_iris, indices)
all(temp1 == temp2)    

# тестируем производительность
microbenchmark(
    subset = long_iris[indices, ],
    fast = fast_subset(long_iris, indices)
    
)

# выигрываем ~40% производительности
# Unit: microseconds
# expr      min        lq     mean    median        uq      max neval
# subset 1000.499 1043.3720 1269.918 1076.4790 1191.8575 15373.31   100
# fast        615.131  653.0385 1007.292  687.1395  729.8475 14622.77   100
источник
11:27пожаловаться#16

ГД

Григорий Демин in R language and Statistical data analysis
И скрин профайлера:
источник
11:28пожаловаться#17

PU

Philipp Upravitelev in R language and Statistical data analysis
огонь. спасибо, буду разбираться.
можно я этот пример и разбор позаимствую для своих учебных материалов?
источник
11:30пожаловаться#18

ГД

Григорий Демин in R language and Statistical data analysis
да, конечно
источник
11:31пожаловаться#19

PU

Philipp Upravitelev in R language and Statistical data analysis
Григорий Демин
да, конечно
👍
источник
12:01пожаловаться#20