about summary refs log tree commit diff
path: root/examples/probeset.scm
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-12-19 19:12:50 +0300
committerMunyoki Kilyungi2023-12-22 11:53:22 +0300
commitda5aa39b9791e697fd84cf2d4f8c881bac55d67a (patch)
tree41a5e83978131530c56e7c6c151e32d89556e417 /examples/probeset.scm
parent203442c692f205dca37a9f32494e2e71907a58e6 (diff)
downloadgn-transform-databases-da5aa39b9791e697fd84cf2d4f8c881bac55d67a.tar.gz
Use gnt:geneSymbol instead of rdfs:label/gnt:symbol.
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'examples/probeset.scm')
-rwxr-xr-xexamples/probeset.scm10
1 files changed, 3 insertions, 7 deletions
diff --git a/examples/probeset.scm b/examples/probeset.scm
index 0f83a86..c7efce7 100755
--- a/examples/probeset.scm
+++ b/examples/probeset.scm
@@ -33,7 +33,7 @@
    (gnt:hasChip rdfs:domain gnc:Probeset)
    (gnt:hasTargetId a owl:ObjectProperty)
    (gnt:hasTargetId rdfs:domain gnc:Probeset)
-   (gnt:symbol rdfs:domain gnc:Probeset)
+   (gnt:geneSymbol rdfs:domain gnc:Probeset)
    (gnt:location rdfs:domain gnc:ProbeSet)
    (gnt:location a owl:ObjectProperty)
    (gnt:strandPosition rdfs:domain gnc:ProbeSet)
@@ -79,12 +79,8 @@
     (set gnt:hasTargetId
          (field ("NULLIF(TRIM(ProbeSet.TargetId), '')"
                  TargetId)))
-    (set gnt:symbol
-         (string->identifier
-          "gene" (regexp-substitute/global #f "[^A-Za-z0-9:]"
-                                           (field ProbeSet Symbol)
-                                           'pre "_" 'post)
-          #:proc (lambda (x) x)))
+    (set gnt:geneSymbol
+         (field ProbeSet Symbol))
     (set dct:description (sanitize-rdf-string (field ProbeSet description)))
     (set gnt:targetsRegion
          (sanitize-rdf-string