blob: f748eae5d9cec4f78470abd355e97f5c492bb620 [file] [log] [blame]
drop dataverse fj-dblp-csx if exists;
create dataverse fj-dblp-csx;
use dataverse fj-dblp-csx;
create type DBLPType as open {
id: int32,
dblpid: string,
title: string,
authors: string,
misc: string
}
create type CSXType as open {
id: int32,
csxid: string,
title: string,
authors: string,
misc: string
}
create nodegroup group1 if not exists on nc1, nc2;
create dataset DBLP(DBLPType) primary key id on group1;
create dataset CSX(CSXType) primary key id on group1;
write output to nc1:'rttest/fj-dblp-csx.adm';
for $paperDBLP in dataset('DBLP')
let $idDBLP := $paperDBLP.id
let $unrankedTokensDBLP := counthashed-word-tokens($paperDBLP.title)
let $tokensDBLP :=
for $token in $unrankedTokensDBLP
for $tokenRanked at $i in
//
// -- - Stage 1 - --
//
// for $paper in dataset('DBLP')
// for $token in counthashed-word-tokens($paper.title)
// group by $tokenGroupped := $token with $paper
// order by count($paper), $tokenGroupped
// return $tokenGroupped
for $paper in dataset('DBLP')
return $paper.title
where $token = $tokenRanked
order by $i
return $i
for $prefixTokenDBLP in $tokensDBLP
for $paperCSX in dataset('CSX')
let $idCSX := $paperCSX.id
let $unrankedTokensCSX := counthashed-word-tokens($paperCSX.title)
let $tokensCSX :=
for $token in $unrankedTokensCSX
for $tokenRanked at $i in
//
// -- - Stage 1 - --
//
// for $paper in dataset('DBLP')
// for $token in counthashed-word-tokens($paper.title)
// group by $tokenGroupped := $token with $paper
// order by count($paper), $tokenGroupped
// return $tokenGroupped
for $paper in dataset('DBLP')
return $paper.title
where $token = $tokenRanked
order by $i
return $i
for $prefixTokenCSX in $tokensCSX
where $prefixTokenDBLP = $prefixTokenCSX
group by $idDBLP := $idDBLP, $idCSX := $idCSX with $paperDBLP
order by $idDBLP, $idCSX
return {'idDBLP': $idDBLP, 'idCSX': $idCSX}