aboutsummaryrefslogtreecommitdiff
path: root/examples/dump-probeset.scm
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-05-26 13:02:23 +0300
committerBonfaceKilz2023-05-30 11:51:30 +0300
commitb0e6ce4d4cd6440a42ecbece895e44ed47979d27 (patch)
treeb1720145ab261891ee2c3d5b4ad20726729b18ab /examples/dump-probeset.scm
parentf5bcefab17ee0e4a5230c4a95b6b1afb5893c4df (diff)
downloadgn-transform-databases-b0e6ce4d4cd6440a42ecbece895e44ed47979d27.tar.gz
Make a probeset's tissue multiset
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/dump-probeset.scm')
-rwxr-xr-xexamples/dump-probeset.scm4
1 files changed, 4 insertions, 0 deletions
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))
#\;)))