/* Valor: ANALISEDISTRIPT Gera análise de distribuição de pontos. Executa script R para gerar a imagem. <Analise->analiseDistriPt> */ case "ANALISEDISTRIPT": include_once dirname(__FILE__) . "/../../classesphp/classe_analise.php"; copiaSeguranca($map_file); if (!isset($_GET["tema2"])) { $_GET["tema2"] = ""; } if (!isset($_GET["limitepontos"])) { $_GET["limitepontos"] = ""; } $m = new Analise($map_file, $tema, $locaplic, $ext); if (empty($_GET["item"])) { $_GET["item"] = ""; } $retorno = $m->analiseDistriPt($locaplic, $dir_tmp, $R_path, $_GET["numclasses"], $_GET["tipo"], $_GET["cori"], $_GET["corf"], $tmpurl, $_GET["sigma"], $_GET["limitepontos"], $_GET["tema2"], $_GET["extendelimite"]); $m->salva(); $_SESSION["contadorsalva"]++; break; } if (isset($map_file) && isset($postgis_mapa) && $map_file != "") { restauraCon($map_file, $postgis_mapa); } cpjson($retorno);
/** * Gera uma imagem com a representacao das ocorrencias na forma de mapa de calor * A imagem e gerada usando o software R * A coluna que sera usada para calcular o mapa de calor e obtida do cadastro de variaveis. Por isso, o layer deve * ser original do METAESTAT * @param arquivo mapfile do mapa atual * @param nome do layer fonte dos dados */ function mapaDeCalor($map_file, $tema) { global $locaplic, $dir_tmp, $R_path, $ext; $nome = basename($map_file) . $tema . "calor"; $mapa = ms_newMapObj($map_file); $teste = $mapa->getlayerbyname($nome); if ($teste != "") { return ""; } $layer = $mapa->getlayerbyname($tema); //verifica se o layer e original ou se foi alterado //se foi alterado, nao e possivel obter a coluna para calcular o mapa de calor if ($layer->getmetadata("METAESTAT_DERIVADO") == "sim") { return ""; } $layer->set("status", MS_OFF); $mapa->save($map_file); $meta = new Metaestat(); $medidavariavel = $meta->listaMedidaVariavel("", $layer->getmetadata("METAESTAT_ID_MEDIDA_VARIAVEL")); include_once dirname(__FILE__) . "/../../classesphp/classe_analise.php"; $m = new Analise($map_file, $tema, $locaplic, $ext); $retorno = $m->analiseDistriPt($locaplic, $dir_tmp, $R_path, 50, "densidade", "243,217,173", "255,0,0", "", 0, true, "", 2, $medidavariavel["colunavalor"]); $m->salva(); return $retorno; }