aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-05-26 13:02:40 +0300
committerBonfaceKilz2023-05-30 11:51:30 +0300
commit646194d11a8fa3e7ee6339af194b93e5af1ae48e (patch)
tree3e784c4a7857222e457fc4352adde0e5da34e9f7 /examples
parentb0e6ce4d4cd6440a42ecbece895e44ed47979d27 (diff)
downloadgn-transform-databases-646194d11a8fa3e7ee6339af194b93e5af1ae48e.tar.gz
Update the probeset's identifier(object)
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples')
-rwxr-xr-xexamples/dump-probeset.scm11
1 files changed, 8 insertions, 3 deletions
diff --git a/examples/dump-probeset.scm b/examples/dump-probeset.scm
index bdcdcca..57d0c60 100755
--- a/examples/dump-probeset.scm
+++ b/examples/dump-probeset.scm
@@ -24,11 +24,16 @@
(tables (ProbeSet
(left-join GeneChip "ON GeneChip.Id = ProbeSet.ChipId")))
(schema-triples
- (gn:name rdfs:range rdfs:Literal))
+ (gn:name rdfs:range rdfs:Literal)
+ (gn:probeset rdfs:range rdfs:Literal))
(triples (ontology
'probeset:
- (field ("IFNULL(ProbeSet.Name, ProbeSet.Id)"
- name)))
+ (regexp-substitute/global
+ #f "[^A-Za-z0-9:]"
+ (field ("IFNULL(ProbeSet.Name, ProbeSet.Id)"
+ name))
+ 'pre "_" 'post))
+ (set rdf:type 'gn:probeset)
(set gn:chipOf (string->identifier "platform" (field GeneChip Name)))
(set gn:name (field ProbeSet Name))
(set gn:symbol (field ProbeSet Symbol))