SquaredLoss {Thermistor}

Squared Loss of Objective

Description

Measuring the difference between the V-DeltaT Curve you get and the target curve under squared loss.

Usage

SquaredLoss(x, StdRes, StdTherm_Val, StdTherm_Beta, Tdata)

Arguments

x

a vector of the indices of each component

StdRes

a vector of available resistor values

StdTherm_Val

a vector of available nominal thermistor resistances

StdTherm_Beta

a vector of of thermistor temperature coefficients

Tdata

a vector of temperature-change values

Value

the squared loss

Examples

data(CompValues)
Tdata <- seq(-40, 85, by=5)
R_id <- c(43, 36, 29, 15, 9, 3)
Res <- CompValues$Res
ThVal <- CompValues$ThVal
ThBeta <- CompValues$ThBeta
SquaredLoss(R_id, Res, ThVal, ThBeta, Tdata)
### 0.04066336