aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-05-26 13:01:44 +0300
committerBonfaceKilz2023-05-30 11:51:30 +0300
commitf5bcefab17ee0e4a5230c4a95b6b1afb5893c4df (patch)
tree2407d361b7eeed80e5fde9ff6627ad2d5b45fc1a
parent304c35e25c33ee6af576c9122e897b0972602481 (diff)
downloadgn-transform-databases-f5bcefab17ee0e4a5230c4a95b6b1afb5893c4df.tar.gz
Make a probeset's alias a multiset
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
-rwxr-xr-xexamples/dump-probeset.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/dump-probeset.scm b/examples/dump-probeset.scm
index 4fa030f..ecd74e3 100755
--- a/examples/dump-probeset.scm
+++ b/examples/dump-probeset.scm
@@ -35,7 +35,9 @@
(set gn:description (field ProbeSet description))
(set gn:chr (field ProbeSet Chr))
(set gn:mb (annotate-field (field ("IFNULL(ProbeSet.Mb, '')" Mb)) '^^xsd:double))
- (set gn:alias (string-trim-both (field ProbeSet alias)))
+ (multiset gn:alias (map string-trim-both
+ (string-split (sanitize-rdf-string (field ProbeSet alias))
+ #\;)))
(set gn:generif (ontology 'generif: (field ProbeSet GeneId)))
(set gn:genbank (ontology 'nuccore: (field ProbeSet GenbankId)))
(set gn:snp (field ("IFNULL(ProbeSet.SNP, '')" SNP)))