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

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

« предыдущая - следующая »

admin

октября 23, 2014, 11:35:22 am Последнее редактирование: марта 27, 2015, 10:57:35 pm от 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 и т.д.

Рейтинг@Mail.ru Яндекс.Метрика