<div class="prettybox">
<h3>...with target project</h3>
<?php
showProjectList($projects, false);
?>
</div>
</div>
<br style="clear: both;" />
<?php
if ($projects[0] == NULL || $projects[0] == "NULL") {
include "../eqtl/footer.php";
exit;
}
// only the database of the source project needs to be opened
$src_proj = $projects[0];
connectToQtlDBs(array($src_proj));
$qtldb = $compara_array[$src_proj]['connection'];
$compara = connectToCompara();
// region selection
// fetch chromosomes to species id
$ens_species = $compara_array[$src_proj]['ensembl_species'];
$chrs = getChromosomesAndLengths($compara, $ens_species);
// additional filtering
$chrs = filter_chromos($qtldb, $chrs);
$species = $compara_array[$src_proj]['species'];
// get selected regions
$chr2reg = array();
if (isset($args[$reg_str])) {
$regs = $args[$reg_str];
foreach ($regs as $reg) {
$pos = strpos($reg, ":");
ENDOFDOCUMENTATION
*/
//include 'html/header.html';
require_once 'db_functions.php';
require_once 'qtl_functions.php';
require_once 'utils.php';
require_once 'fill_related_projects.php';
fill_compara_array();
// databases:
$args = $_GET;
$proj_str = 'projects';
$region_str = 'region';
$hide_str = 'hide';
if (isset($args[$proj_str]) && count($args[$proj_str]) == 2) {
connectToQtlDBs($args[$proj_str]);
} else {
fatal_error('No projects found or wrong number of projects!');
}
$compara = connectToCompara();
$proj1 = $args[$proj_str][0];
$proj2 = $args[$proj_str][1];
$experiment1 = $compara_array[$proj1];
$experiment2 = $compara_array[$proj2];
$species1 = $experiment1['species'];
$species2 = $experiment2['species'];
function getReg($str, &$chr, &$start, &$end)
{
$pos = strpos($str, ":");
$chr = substr($str, 0, $pos);
$reg = substr($str, $pos + 1);
$start = tic();
$args = $_GET;
$compara = connectToCompara();
$proj_str = 'projects';
if (!isset($args[$proj_str])) {
fatal_error('No project given as argument!');
}
$projects = $args[$proj_str];
$n_proj = count($projects);
switch ($n_proj) {
case 1:
// is possible, if the referrer is locus.php
break;
case 2:
// is possible, if the referrer is regions.php
connectToQtlDBs($projects);
break;
default:
fatal_error('Wrong number of projects!');
break;
}
$experiment1 = $compara_array[$projects[0]];
$experiment2 = $compara_array[$projects[1]];
$reg_str = 'regions';
$chr2reg = array();
//get confidence interval from GET
if (isset($args['confidence_int'])) {
$confidence_int = $args['confidence_int'];
} else {
fatal_error('No confidence interval found!');
}
<?php
include 'html/header.html';
require_once 'db_functions.php';
require_once 'qtl_functions.php';
require_once 'utils.php';
require_once 'fill_related_projects.php';
fill_compara_array();
connectToQtlDBs(array('Ratte'));
global $compara_array;
$db = $compara_array['Ratte']['connection'];
useDB('eqtl_stockholm_eae_logplier', $db);
//useDB('eqtl_rostock_eae', $db);
$loci = array('c1.loc1', 'c1.loc10', 'c1.loc100', 'c1.loc101', 'c1.loc102', 'c1.loc103', 'c1.loc104', 'c1.loc105', 'c1.loc106', 'c1.loc107', 'c1.loc108', 'c1.loc109', 'c1.loc11', 'c1.loc110', 'c1.loc111', 'c1.loc112', 'c1.loc113', 'c1.loc114', 'c1.loc115');
//$loci = array('c9.loc48', 'c9.loc43', 'c9.loc40' , 'c9.loc39');
loci2stable_ids_new($loci, $db);
loci2stable_ids_new($loci, $db);
$t = tic();
print_r(loci2stable_ids_new($loci, $db));
print "<br>";
print "<br>";
toc($t, 'opt');
print "<br>";
print "<br>";
$t = tic();
print_r(loci2stable_ids($loci, $db));
print "<br>";
print "<br>";
toc($t, 'normal');
include 'html/footer.html';
