From b0e6ce4d4cd6440a42ecbece895e44ed47979d27 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Fri, 26 May 2023 13:02:23 +0300 Subject: Make a probeset's tissue multiset Signed-off-by: Munyoki Kilyungi --- examples/dump-probeset.scm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'examples/dump-probeset.scm') diff --git a/examples/dump-probeset.scm b/examples/dump-probeset.scm index ecd74e3..bdcdcca 100755 --- a/examples/dump-probeset.scm +++ b/examples/dump-probeset.scm @@ -35,6 +35,10 @@ (set gn:description (field ProbeSet description)) (set gn:chr (field ProbeSet Chr)) (set gn:mb (annotate-field (field ("IFNULL(ProbeSet.Mb, '')" Mb)) '^^xsd:double)) + (multiset gn:tissue (map string-trim-both + (string-split + (field ("IFNULL(ProbeSet.Tissue, '')" Tissue)) + #\,))) (multiset gn:alias (map string-trim-both (string-split (sanitize-rdf-string (field ProbeSet alias)) #\;))) -- cgit v1.2.3