Standard on Ratio Studies function

Source: R/standard_ratio.R

Statiscal anlysis for matching of appraisal and market data. Based on International Association of Assessing Officers' Standard on Ratio Studies Document

iaao_Ratio(x, ...)

# S3 method for lm
iaao_Ratio(object, func = "identity", ...)

Arguments

...

further arguments passed to iaao_Ratio.
object

An object of class lm.
func

function used to transform the response (defaults to identity)
AssessedValue

vector of assessed values (valores venais ou valores preditos do modelo)
SalePrice

vector of sale prices (preços de mercado ou preços reais do modelo)

Value

COD and PRD Ratios according to IAOO

Examples

library(sf)

#> Linking to GEOS 3.8.0, GDAL 3.0.4, PROJ 6.3.1
dados <- st_drop_geometry(centro_2015)
dados$padrao <- as.numeric(dados$padrao)
fit <- lm(log(valor)~area_total + quartos + suites + garagens +
log(dist_b_mar) + I(1/padrao), data = dados, subset = -c(31, 39))
iaao_Ratio(object = fit, func = "log")

#> Razão das medianas (Median Ratio) =  1,009 
#> Nível:  Valor Venal SUPERIOR ao valor de mercado: 
#>  necessidade de atualização dos valores venais. 
#> 
#> COD (Coefficient of Dispersion) =  10,21% 
#> Nível:  Equidade de Valor Venal BOA (COD entre 11% e 14%) 
#> 
#> PRD (Price-Related Differential) =  101,19% 
#> Nível:  Tendência REGRESSIVA de Valor Venal 
#> DENTRO do intervalo recomendado (98% a 103%) 
#> 
#> PRB (Price-Related Bias) =  -0,016 
#> Intervalo de Confiança:  -0,059  0,027 
#>