Arrival target setting using SF

Description

Employs dm.sf over time to estimate the arrival of known specifications. This function is valid only when multiplicative form of directional vector is used.

Usage

1
2
target.arrival.sf(xdata, ydata, date, t, rts="crs", g=NULL, 
                  wd=NULL, sg="ssm", ftype="d", cv="convex")

Arguments

xdata

Input(s) vector (n by m)

ydata

Output(s) vector (n by s)

date

Production date (n by 1)

t

A vantage point from which the RoC is captured

rts

Returns to scale assumption
"crs" Constant RTS (default)
"vrs" Variable RTS
"irs" Increasing RTS
"drs" Decreasing RTS

g

Directional vector indicating a measurement direction (n by (m+s))
By default (NULL), xdata & ydata will be used

wd

Weak disposability vector indicating (an) undesirable output(s) (1 by s)

sg

Employs second-stage optimization
"ssm" Slack-sum maximization (default)
"max" Date-sum maximization
"min" Date-sum minimization

ftype

Frontier type
"d" Dynamic frontier (default)
"s" Static frontier

cv

Convexity assumption
"convex" Convexity holds (default)
"fdh" Free disposal hull (this will override rts)

Value

$eff_t

Efficiency at t

$lambda_t

Intensity vector at t

$eft_date

Effective date

$roc_avg

Average RoC

$roc_local

Local RoC

$roc_ind

Individualized RoC

$arrival_avg

Estimated arrival using roc_avg

$arrival_seg

Estimated arrival using roc_ind

Author(s)

Dong-Joon Lim, PhD

References

Lim, Dong-Joon, et al. "Comparing technological advancement of hybrid electric vehicles (HEV) in different market segments." Technological Forecasting and Social Change 97 (2015): 140~153.

Lim, Dong-Joon, and Timothy R. Anderson. Time series benchmarking analysis for new product scheduling: who are the competitors and how fast are they moving forward?. Advances in DEA Theory and Applications: with Examples in Forecasting Models. Wiley (forthcoming), 2016.

See Also

dm.sf Distance measure using SF
roc.sf RoC calculation using SF
map.soa.sf SOA mapping using SF
target.arrival.sf Arrival target setting using SF

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
# Estimate arrivals of MY2013 hev models
  # Load hev dataset
  df <- dataset.hev.2013
  
  # ready
  x <- subset(df, select = 3)
  y <- subset(df, select = 4 : 6)
  d <- subset(df, select = 2)
  g <- data.frame(x, y)
  
  # go
  target.arrival.sf(x, y, d, 2012, "vrs", g)$arrival_seg