Raster Tabelle

Gespeichert von Obiwan am
im Forum GIS general
Liebe Mitstreiter,
zwei Fragen hätte ich!
1. Weiss jamand, ob es möglich ist, die VAT eines Integer Grids mit einem Editor o. Ä. zu öffnen bzw. zu editieren? Sowohl meine Text-Editoren, als auch z. B. Excel bringen nur Quatsch zum Vorschein. Aus dem Geschmöker im Forum von Esri soll die direkte Umwandlung der VAT in bsp. eine *.dbf Datei möglich sein. Nur wie ist die Frage. Wird leider aus dem gelesenen Beitrag nicht klar.

2. Hängt mit 1. zusammmen: Warum ich überhaupt darauf komme ist Folgendes: Ich würde gerne die Tabelle einer Rasterkarte derart exportieren, dass ich nicht nur die "Values" mit den entsprechenden "Counts" in einer *.dbf habe, sondern für jeden Pixelwert eine eigene Tabellenzeile bekomme. So kann ich dann mit Excel die einzelnen Werte plotten und z. B. eine Regression durchführen.
Bin für jede Anregung empfänglich.

O.

Gespeichert von Maxilla am Mi., 16.08.2006 - 09:52

Permalink
Hallo Obi,

die VAT kannst du in AV3 einfach als Tabelle laden (Projektfenster - Tabelle - Hinzufügen - Typ INFO einstellen) oder eben als Attributtabelle des Grid-Themas öffnen. Dann, bei Bedarf, als DBF exportieren.

Bei Punkt 2 könnte dir vielleicht eher eine Umwandlung des Grids in ein Punkt-Thema weiterhelfen. Unten ein einfaches Skript dafür.

In der ArcToolbox von AV9 gibt es das Werkzeug 'Raster to Point', das im Ergebnis dasselbe macht.

' Grid2PointTheme - Basic (ohne weiteren Fehlercheck)
' Vor Ausführung View mit aktivem Grid-Thema aktivieren

theView = av.GetActiveDoc
thePrj = theView.GetProjection
theProjFlag = thePrj.IsNull.Not
theGthm = theView.GetActiveThemes.Get(0)
theGrid = theGthm.GetGrid
thePtNam = FileName.GetCWD.MakeTmp("gridpt","shp")
thePtName = FileDialog.Put(thePtNam, "*.shp", "Save Point Theme")
if (thePtName = NIL) then return NIL end
thePtName.SetExtension("shp")
thePtFTab = theGrid.AsPointFTab(thePtName,thePrj)
thePtFTab.SetEditable(TRUE)
thePtThm = FTheme.Make(thePtFTab)
theView.AddTheme(thePtThm)

theX = Field.Make ("X_Coord",#FIELD_DECIMAL,18,6)
thePtFTab.AddFields({theX})

theY = Field.Make ("Y_Coord",#FIELD_DECIMAL,18,6)
thePtFTab.AddFields({theY})

if (theProjFlag) then
'Projection defined
thePtFTab.Calculate("[Shape].ReturnProjected(thePrj).GetX", theX)
thePtFTab.Calculate("[Shape].ReturnProjected(thePrj).GetY", theY)
else
'No projection defined
thePtFTab.Calculate("[Shape].GetX", theX)
thePtFTab.Calculate("[Shape].GetY", theY)
end
thePtFTab.SetEditable(FALSE)


Gruß, Mx.

Gespeichert von Obiwan am Mi., 16.08.2006 - 10:14

Permalink
Danke Mx, diesen "Umweg" hatte ich auch schon überlegt. Dachte es geht evt. auch direkter. Aber dann halt nicht.

LG O.

Gespeichert von Obiwan am Mi., 16.08.2006 - 10:37

Permalink
Noch was:
Ist jemandem bekannt, ob es möglich ist, in ArcGis / ArcView die Werte einer Rasterkarte in eine Regression (= Trendlinie in Excel) einfliessen zu lassen?