| drop dataverse rares03 if exists; |
| |
| create dataverse rares03; |
| |
| use dataverse rares03; |
| |
| create type UserType as open { |
| uid: int32, |
| name: string, |
| lottery_numbers: {{int32}} |
| } |
| |
| create type VisitorType as open { |
| vid: int32, |
| name: string, |
| lottery_numbers: {{int32}} |
| } |
| |
| create nodegroup group1 if not exists on nc1, nc2; |
| |
| create dataset Users(UserType) |
| primary key uid on group1; |
| |
| create dataset Visitors(VisitorType) |
| primary key vid on group1; |
| |
| |
| // set simfunction "jaccard"; |
| // set simthreshold ".8"; |
| |
| write output to nc1:"/tmp/rares03.adm"; |
| |
| for $user in dataset('Users') |
| let $tokens := |
| for $lottery_number in $user.lottery_numbers |
| for $token at $i in |
| for $user in dataset('Users') |
| for $lottery_number in $user.lottery_numbers |
| group by $item := $lottery_number with $user |
| let $count := count($user) |
| order by $count desc |
| return $item |
| where $lottery_number = $token |
| order by $token |
| return $i |
| return {"uid": $user.uid, "tokens": $tokens} |