This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<?xml version="1.0" encoding="UTF-8"?> | |
<POLIGONO Sup_ha="18,4355531115" code="R(25PSTpc_22UDS(45SNE_20VAP_15EDFva_15ZAU_03OCT_02LAA)_18LFNsc_15LFCrr_10CHLrr_10LVIsc)" Id="00b1b9be-caa0-44b0-9c39-389d24cd81df"> | |
<COBERTURA Sup="100" Desc="Mosaico Regular" ID="R"> | |
<COBERTURA Sup="25" Desc="Pastizal" ID="PST"> | |
<ATRIBUTO Desc="procedencia de cultivos" ID="pc"/> | |
</COBERTURA> | |
<COBERTURA Sup="22" Desc="Discontinuo" ID="UDS"> | |
<COBERTURA Sup="45" Desc="Suelo No Edificado" ID="SNE"/> | |
<COBERTURA Sup="20" Desc="Vial, Aparcamiento o Zona Peatonal sin Vegetación" ID="VAP"/> | |
<COBERTURA Sup="15" Desc="Edificación" ID="EDF"> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
CREATE OR REPLACE FUNCTION _plr_hist(text, text) | |
RETURNS text AS | |
$BODY$ | |
select = 'select ' | |
campo = arg1 | |
from = ' from ' | |
tabla = arg2 | |
selection = paste(select, campo, from, tabla, sep=''); | |
## Ejecutamos la consulta y la almacenamos en el objeto "sql"; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Instalo los packages necesarios: | |
#------------------------------------------------- | |
install.packages("pixmap", dependencies= T) | |
install.packages("fields", dependencies= T) | |
# Cargo las librerias: | |
#------------------------------------------------- | |
library(pixmap) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Cargamos las librerias necesarias | |
library(Cairo) | |
library(plotrix) | |
# Definimos la funcion | |
clasif.textural = function (soiltexture = NULL, at = seq(0.1, 0.9, by = 0.1), | |
axis.labels = c("% arena (entre 0,05 y 2 mm)", "% limo (entre 0,05 y 0,002 mm)", "% arcilla (menor de 0,002 mm)"), | |
tick.labels = list(l = seq(10, 90, by = 10), r = seq(10, | |
90, by = 10), b = seq(10, 90, by = 10)), show.names = TRUE, | |
show.lines = TRUE, col.names = "black", bg.names = par("bg"), | |
show.grid = TRUE, col.axis = "black", col.lines = "black", |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- Function: _plr_clasif_textural(text, text, text, text, text, text) | |
-- DROP FUNCTION _plr_clasif_textural(text, text, text, text, text, text); | |
CREATE OR REPLACE FUNCTION _plr_clasif_textural(text, text, text, text, text, text) | |
RETURNS text AS | |
$BODY$ | |
-- | |
--Put the R code here | |
-- |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
SELECT _plr_clasif_textural ( 'arenas' , 'limos' , 'arcilla' , 'submuestra' , 'simbolo' , 'etiquetas') ; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
## Abrimos la consola de R y cargamos la librería | |
library(RSAGA) | |
## Seleccionamos el fichero raster que queremos trocear y una capa vectorial que queramos usar como límites. También especificamos el directorio donde van los outputs. Para trabajar con Windows recomiendo rutas sin espacios. | |
raster<- file.choose() | |
poligonos<- file.choose() | |
directorio <-choose.dir() | |
## Consultamos hasta encontrar la herramienta que nos separa un shapefile en varios, obteniendo un shapefile por cada polígono, o lo que quisiéramos. Por ejemplo: | |
## rsaga.get.modules("shapes_grid") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
% GIS&Chips nice business card | |
% By Benito M. Zaragozí | |
% Version 0.1 released 02/11/2011 | |
% Further releases in: www.gisandchips.org | |
% This template is composed by three .tex files (businessCard.tex, businessCard_back.tex and businessCardx10.tex) for preparing a basic layout. | |
\documentclass[10pt,a4paper]{minimal} | |
\usepackage{graphicx} | |
\usepackage[margin=1cm]{geometry} | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
% GIS&Chips nice business card | |
% By Benito M. Zaragozí | |
% Version 0.1 released 02/11/2011 | |
% Further releases in: www.gisandchips.org | |
% This template is composed by three .tex files (businessCard.tex, businessCard_back.tex and businessCardx10.tex) for preparing a basic layout. | |
\documentclass{beamer} | |
\usepackage[utf8x]{inputenc} | |
\usepackage[spanish]{babel} | |
\usepackage{geometry} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
% GIS&Chips nice business card | |
% By Benito M. Zaragozí | |
% Version 0.1 released 02/11/2011 | |
% Further releases in: www.gisandchips.org | |
% This template is composed by three .tex files (businessCard.tex, businessCard_back.tex and businessCardx10.tex) for preparing a basic layout. | |
\documentclass{beamer} | |
\usepackage[utf8x]{inputenc} | |
\usepackage[spanish]{babel} | |
\usepackage{hyperref} |