File tree Expand file tree Collapse file tree 1 file changed +13
-0
lines changed Expand file tree Collapse file tree 1 file changed +13
-0
lines changed Original file line number Diff line number Diff line change @@ -412,6 +412,19 @@ function genes($file)
412
412
}
413
413
}
414
414
415
+ // parse the sources of validation
416
+ //<SourceOfValidation>16150725[PMID]_16150725[PMID]_21771795[PMID]</SourceOfValidation>
417
+ $ sources = explode ("_ " ,$ dga ->SourceOfValidation );
418
+ foreach ($ sources AS $ source ) {
419
+ preg_match_all ("/([0-9]*)\[([^\]]*)?\]/ " ,$ source , $ m , PREG_PATTERN_ORDER );
420
+ if (isset ($ m [1 ][0 ])) {
421
+ $ prefix = parent ::getRegistry ()->getPreferredPrefix ($ m [2 ][0 ]);
422
+ parent ::addRDF (
423
+ parent ::triplify ($ gene_id ,parent ::getVoc ()."source-of-validation " , "$ prefix: " .$ m [1 ][0 ])
424
+ );
425
+ }
426
+ }
427
+
415
428
$ dga_id = parent ::getRes ().((string )$ d ->OrphaNumber )."_ " .md5 ($ dga ->asXML ());
416
429
$ ga = $ dga ->DisorderGeneAssociationType ;
417
430
$ ga_id = parent ::getNamespace ().((string ) $ ga ->attributes ()->id );
You can’t perform that action at this time.
0 commit comments