Генератор простых чисел Qlikview & Macros VBScript

Автор admin, 23 октября 2014, 11:35:22

« назад - далее »

admin

Простенький пример использования макросов в скриптах при обработке данных:
Создаем макрос (Инструменты / Редакторов макросов)
function IsPrime(Num)
if Num = 1 then exit Function
' IsPrime = True
IsPrime = 1
for i = 2 to Num -1
' If Num mod i = 0 then IsPrime = False
If Num mod i = 0 then IsPrime = 0
next
end function


В скрипте создаем строку, генерирующую таблицу с признаком принадлежности к простым числам:
PrimeNumbers:
Load RecNo() as RecNum, IsPrime(RecNo()) as [flgPrime] autogenerate 100;


Все, Сохраняем и запускаем.

Напомню - простые числа, те которые делятся без остатка только на 1 и на себя.
1, 3, 5, 7, 11, 13 и т.д.

Яндекс.Метрика