NAME

UMLS::Similarity::random - Perl module for computing a random baseline by assigning a random number between zero and one as the similarity score.

SYNOPSIS

#!/usr/bin/perl

use UMLS::Interface;
use UMLS::Similarity::random;

my $umls = UMLS::Interface->new(); 
die "Unable to create UMLS::Interface object.\n" if(!$umls);

my $random = UMLS::Similarity::random->new($umls);
die "Unable to create measure object.\n" if(!$random);

my $cui1 = "C0005767";
my $cui2 = "C0007634";

@ts1 = $umls->getTermList($cui1);
my $term1 = pop @ts1;

@ts2 = $umls->getTermList($cui2);
my $term2 = pop @ts2;

my $value = $random->getRelatedness($cui1, $cui2);

print "The similarity between $cui1 ($term1) and $cui2 ($term2) is $value\n";

DESCRIPTION

This module assigns a random number between zero and one as the semantic relatedness of two concepts in the UMLS

USAGE

The semantic relatedness modules in this distribution are built as classes that expose the following methods: new() getRelatedness()

TYPICAL USAGE EXAMPLES

To create an object of the random measure, we would have the following lines of code in the perl program.

use UMLS::Similarity::random;
$measure = UMLS::Similarity::random->new($interface);

The reference of the initialized object is stored in the scalar variable '$measure'. '$interface' contains an interface object that should have been created earlier in the program (UMLS-Interface).

If the 'new' method is unable to create the object, '$measure' would be undefined.

To find the semantic relatedness of the concept 'blood' (C0005767) and the concept 'cell' (C0007634) using the measure, we would write the following piece of code:

$relatedness = $measure->getRelatedness('C0005767', 'C0007634');

SEE ALSO

perl(1), UMLS::Interface

perl(1), UMLS::Similarity(3)

AUTHORS

Bridget T McInnes <bthomson at cs.umn.edu>
Siddharth Patwardhan <sidd at cs.utah.edu>
Serguei Pakhomov <pakh0002 at umn.edu>
Ted Pedersen <tpederse at d.umn.edu>

COPYRIGHT AND LICENSE

Copyright 2004-2011 by Bridget T McInnes, Siddharth Patwardhan, Serguei Pakhomov, Ying Liu and Ted Pedersen

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.