Print Out Summary of Validity Analysis

Description

Selectively print Validity data from an ItemAnalysis object, created by the ItemAnalysis() function.

Usage

## S3 method for class 'validity'
print(x, ...)

Arguments

Author(s)

Nikolaos Giallousis, psierevn@gmail.com

Examples

data(Depression98)
depressionScale <- Scale(data=Depression98, 
                         orders=list(
                           c(16,19,11,9,1,17,5,18,4,8,2,12,
                             20,10,14,6,3,13,15,7),
                           c(1,18,4,15,7,8,3,14,20,6,19,16,
                             12,5,10,13,2,17,11,9)),
                         orders_id=c(
                           rep(1, 49),
                           rep(2, 49)),
                         reverse=c(3,4,13,14,18,20),
                         col_names= paste('q', 1:20, sep=''))

depressionPre <- PreProc(depressionScale)

depressionRel <- ItemAnalysis(depressionPre)
# specifies that you want to print only the 
# validity part of the object.
print(depressionRel$valid)

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(Scale)
Loading required package: psych
Loading required package: Hmisc
Loading required package: lattice
Loading required package: survival
Loading required package: Formula
Loading required package: ggplot2

Attaching package: 'ggplot2'

The following objects are masked from 'package:psych':

    %+%, alpha


Attaching package: 'Hmisc'

The following object is masked from 'package:psych':

    describe

The following objects are masked from 'package:base':

    format.pval, round.POSIXt, trunc.POSIXt, units

Loading required package: MASS
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/Scale/print.validity.Rd_%03d_medium.png", width=480, height=480)
> ### Name: print.validity
> ### Title: Print Out Summary of Validity Analysis
> ### Aliases: print.validity
> ### Keywords: survey multivariate
> 
> ### ** Examples
> 
> data(Depression98)
> depressionScale <- Scale(data=Depression98, 
+                          orders=list(
+                            c(16,19,11,9,1,17,5,18,4,8,2,12,
+                              20,10,14,6,3,13,15,7),
+                            c(1,18,4,15,7,8,3,14,20,6,19,16,
+                              12,5,10,13,2,17,11,9)),
+                          orders_id=c(
+                            rep(1, 49),
+                            rep(2, 49)),
+                          reverse=c(3,4,13,14,18,20),
+                          col_names= paste('q', 1:20, sep=''))
> 
> depressionPre <- PreProc(depressionScale)
Warning message:
In PreProc(depressionScale) :
  Items' vector unspecified. out$items is NULL...
> 
> depressionRel <- ItemAnalysis(depressionPre)
> # specifies that you want to print only the 
> # validity part of the object.
> print(depressionRel$valid)
A gls factor analysis was conducted. Items were regressed to
      a single factor. Their loadings are the following:
       q1        q3       q15        q4       q13       q19        q8        q6 
0.2265837 0.2900250 0.3400521 0.4109354 0.4173177 0.4259260 0.4320918 0.4347683 
      q16       q17       q14       q10        q7       q18        q2       q20 
0.4515751 0.4582502 0.4727368 0.4729194 0.4816417 0.4997000 0.4998320 0.5111198 
       q5        q9       q11       q12 
0.5168634 0.5349238 0.5471951 0.6541123 
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>