Функции с датами до тысячелетия в q - PullRequest
0 голосов
/ 16 октября 2018

Я построил функцию в q так, что я могу видеть, сколько воскресных дней выпадает на 1-е число месяца между двумя датами

\W 1 f3:{[sd;ed] count distinct `week$(sd + til 1 + ed - sd) where (`dd$distinct `week$sd + til 1 + ed - sd)=01}

Как я могу редактировать для работы с датами до 2000 года?Могу ли я поставить модуль вокруг отрицательных дат?Или это восстановит мою функцию неправильно?

1 Ответ

0 голосов
/ 16 октября 2018

Вы также можете попробовать это:

    q) f:{sum 1=mod[`date$a[1] + til 1+(-). a:(0;1<`dd$x)+`month$(y;x);7]}
    q) f[2018.01.01;2018.12.31]  / 2
    q) f[1998.01.02;1999.12.31]  / 4 
...