<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><title>R: Modify std object</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" href="R.css" />
</head><body>

<table width="100%" summary="page for tweak.std"><tr><td>tweak.std</td><td style="text-align: right;">R Documentation</td></tr></table>

<h2>
Modify std object
</h2>

<h3>Description</h3>

<p>The function is used for modifying of existing <code>std</code> object.
</p>


<h3>Usage</h3>

<pre>
tweak.std(
  x,
  desc = desc.std(x = x),
  lmargs = as.list(x[[1]]$lmfit$call[-c(1:3)]))
</pre>


<h3>Arguments</h3>

<table summary="R argblock">
<tr valign="top"><td><code>x</code></td>
<td>

<p><code>std</code> object to be modified
</p>
</td></tr>
<tr valign="top"><td><code>desc</code></td>
<td>

<p>list of description meta data, default is original meta data of object <code>x</code>
</p>
</td></tr>
<tr valign="top"><td><code>lmargs</code></td>
<td>

<p>list of <code>lm</code> additional arguments, default is original <code>lmargs</code> taken from <code>lm</code> call (all <code>lm</code> arguments except <code>formula</code> and <code>data</code>)
</p>
</td></tr>
</table>


<h3>Details</h3>

<p>The function modifies the <code>std</code> object or just refresh the <code>x</code> object while recalculating the <code>lm</code> fit, Rosin - Rammler coefficients and characteristic sizes. The refreshing of an old saved object can be useful in case that <code>lm</code> fit structure changes across <span style="font-family: Courier New, Courier; color: #666666;"><b>R</b></span> versions as the <code>std</code> object encapsulates <code>lm</code> fit result.
</p>


<h3>Value</h3>

<p>Returns <code>std</code> object with length = 1.
</p>


<h3>See Also</h3>

<p><code>desc.std</code>, <code>std</code>
</p>


<h3>Examples</h3>

<pre>
# Load the data, modify linear model and plot.
data(lignite)
std1 &lt;- lignite[2]
std2 &lt;- tweak.std(lignite[2],lmargs = list(weights=c(1,1,0,1)),
        desc = desc.std(x=std1,Title="Lignite w 1 1 0 1"))
plot(c(std1,std2))
</pre>


</body></html>
