R Graphical Manual

Browse All

Last data update: 2014.03.03

R: Inspection cost function

Ims	R Documentation

Inspection cost function

Description

mean inspection cost per lot of process average quality, assuming that the sample is inspected by variables and the remainder of rejected lots is inspected by attributes, divided by parameter cm (cost of inspecting one item by variables divided by cost of inspecting the item by attributes)

Usage

Ims(n, k, N,  pbar, cm = 1,type = c("exact", "napprox","ewmaSK","ewma2"),lam=1)

Arguments

`n`	sample size
`k`	critical value of the samping plan
`N`	lot size (number of items in the lot)
`pbar`	process average fraction defective
`cm`	cost of inspection of one item by variables divided by cost of inspection of the item by attributes, default value 1
`type`	type of `OC` (operating characteristic) used, either `"exact"` (default) using non-central t-distribution, or `"napprox"` for approximate OC; if EWMA statistic is to be used, `"ewmaSK"` stands for the sigma known case, `"ewma2"` stands for the sigma unknown case
`lam`	smoothing parameter in case that EWMA statistic is used

Value

single value

Examples

Ims(20, 2.58555,1000, 0.001 ,1.5,type="ewmaSK",lam=1 )

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(LTPDvar)
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/LTPDvar/Ims.Rd_%03d_medium.png", width=480, height=480)
> ### Name: Ims
> ### Title: Inspection cost function
> ### Aliases: Ims
> ### Keywords: misc
> 
> ### ** Examples
> 
> Ims(20, 2.58555,1000, 0.001 ,1.5,type="ewmaSK",lam=1 )
[1] 41.76372
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>