Closed hguerra closed 8 years ago
Fixing this issue must also execute all the source code lines from CellularSpace
. Currently the following lines are not executed:
Checking CellularSpace.lua
Line 200 was not executed.
Line 408 was not executed.
Line 412 was not executed.
Line 413 was not executed.
Line 419 was not executed.
Line 420 was not executed.
The code below are used to get raster properties from TerraLib.
packages/terralib/lua/TerraLib.lua
local function createDataSetAdapted(dSet)
local count = 0
local numProps = dSet:getNumProperties()
local set = {}
local precision = 15
while dSet:moveNext() do
local line = {}
for i = 0, numProps - 1 do
local type = dSet:getPropertyDataType(i)
if isNumber(type) then
line[dSet:getPropertyName(i)] = tonumber(dSet:getAsString(i, precision))
elseif type == binding.BOOLEAN_TYPE then
line[dSet:getPropertyName(i)] = dSet:getBool(i)
elseif type == binding.GEOMETRY_TYPE then
line[dSet:getPropertyName(i)] = dSet:getGeom(i)
elseif type == binding.RASTER_TYPE then
local raster = dSet:getRaster(i)
line[dSet:getPropertyName(i)] = raster
line.name = raster:getName()
line.numberOfColumns = raster:getNumberOfColumns()
line.numberOfRows = raster:getNumberOfRows()
line.numberOfBands = raster:getNumberOfBands()
line.SRID = raster:getSRID()
line.resolutionX = raster:getResolutionX()
line.resolutionY = raster:getResolutionY()
do
local b = 0
while b < line.numberOfBands do
line[b] = raster:getBand(b)
b = b + 1
end
end
collectgarbage("collect")
else
line[dSet:getPropertyName(i)] = dSet:getAsString(i)
end
end
set[count] = line
count = count + 1
end
return set
end
The script below uses Tif file to create a CellularSpace.
output: