Description Usage Arguments Details Value Author(s) References See Also Examples

A function for computing key statistics from a Lens Model (Brunswick, 1952) analysis.

1 | ```
lensModel(inSet, exSet, cueSet)
``` |

`inSet` |
A data.frame containing the variables on the validity side of the lens model. It must have the same dimensions as exSet and columns corresponding to the columns in exSet. |

`exSet` |
A data.frame containing the variables on the utilization side of the lens model. It must have the same dimensions as inSet and columns corresponding to the columns in inSet. |

`cueSet` |
A data.frame containing the cues to use in the lens analysis. |

This function is designed to perform so-called Lens Model analyses. If a set of targets has known criterion values on some dimensions (e.g., self-reports of personality) a set of judges may make judgments of those targets (e.g., other reports of personality) based on some information (i.e., Cues) presented to the judges (e.g., some behavioral acts). A lens model analyses examines (a) the achievement of the judges (i.e., accuracy) for each dimension being judged as the correlation between the judgments and the criterion, (b) the validities of the cues for each dimension as the linear regression coefficients predicting the criterion from all of the cues, and (c) the cue utilization of the judges for each dimension as the linear regression coefficients predicting the judgments from the cues. This function computes all of this and much more in one step.

Returns a list containing the following

`Lens Stats` |
A data.frame containing the following statistics for each variable in inSet: |

Validity SaturationThe multiple R for the Validity side of the Lens Model

Utilization SaturationThe multiple R for the Utilization side of the Lens Model

Coefficient CorrelationThe correlation between the Cue Validities and the Cue Utilizations (not including the intercept)

AchievementThe correlation between inSet and exSet

Linear KnowledgeThe correlation between the fitted values from the validity and utilization sides of the model

Unmodeled KnowledgeThe correlation between the residuals from the validity and utilization sides of the model

`Cue Validities` |
A data.frame of size ncol(cueSet)+1 X ncol(inSet) containing the regression coefficients (including intercept) for the validity side of the lens model. |

`Cue Utilizations` |
A data.frame of size ncol(cueSet)+1 X ncol(exSet) containing the regression coefficients (including intercept) for the utilization side of the lens model. |

Ryne A. Sherman

Brunswik, E. (1952). The conceptual framework of psychology. Chicago: University of Chicago Press

1 2 3 4 5 6 7 8 | ```
data(lensData)
DIAMONDS.in <- lensData[,32:39] # Self-ratings on 8 Situation Characteristics
DIAMONDS.ex <- lensData[,40:47] # Coder-ratings on 8 Situation Characteristics
CUES <- lensData[,3:31] # Coded Situation Cues
mod <- lensModel(DIAMONDS.in, DIAMONDS.ex, CUES) # Get the lens statistics
mod$'Lens Stats' # View the overall stats
print(mod) # View the individual coefficients and p-values
``` |

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.