Как можно ускорить VB макрос для пакета Statistica?

15432: Рабочий код получился такой. Работает великолепно - все делает за 15 минут вместо 5 часов! Спасибо за идею!

For row = 1 To 250
For col = 1 To 13^5*5
num = ABCDE(row, col)
If num >= -25 And num <= 60 Then
FREQUENCY(row, num+25) = FREQUENCY(row, num+25) + 1
End If
Next col
Next row

Как можно ускорить VB макрос для пакета Statistica?

Если я правильно понял ваше предложение, 15432, то необходимо вместо цикла с NUM написать такую строку "If ABCDE(row, col) = -25 Then FREQUENCY(row, 1) = FREQUENCY(row, 1)+1" для каждого из 85 значений от -25 до 60. Я так сделал - время выполнения сократилось до 4-х часов, что все-равно много. Как еще можно сократить? Убрать теперь цикл для row и прописать напрямую номера 250 строк? ))

Можно ли оптимизировать код по скорости?

Да, попробую. Спасибо

Можно ли оптимизировать код по скорости?

Александр +: Beg your pardon? ))

Как можно ускорить VB макрос для пакета Statistica?

Jony1337: они указаны в коде в этой строке For NUM = -25 To 60

Как можно ускорить VB макрос для пакета Statistica?

Можете подать идею более быстрого алгоритма?

Можно ли оптимизировать код по скорости?

Спасибо, попробую реализовать. HR_PRED - это массив размерностью 254 на 5

Можно ли оптимизировать код по скорости?

Это код из VB макроса для пакета Statistica. Думаю, на другом языке не получится, но спасибо за идею