An abridged five-item version of the 15-item International Index of Erectile Function (IIEF) was developed (IIEF-5) to diagnose the presence and severity of erectile dysfunction (ED). (Rosen et al. 2000)

scoring_iief5(data, items = 1:5, keep = TRUE, nvalid = 5, digits = NULL)

Arguments

data

a data.frame containing the IIEF-5 items orderd from 1 to 5

items

A character vector with the IIEF-5 item names ordered from 1 to 5, or a numeric vector indicating the column numbers of the IIEF-5 items in data.

keep

Logical, whether to keep the single items and whether to return variables containing the number of non-missing items on each scale for each respondent. The default is TRUE.

nvalid

A numeric value indicating the number of non-missing items required for score calculations. The default is 5.

digits

Integer of length one: value to round to. No rounding by default.

Value

The function returns 3 variables:

  • nvalid.iief5: Number of valid values (MAX=5)

  • score.iief5: IIEF-5 Score

  • cutoff.iief5: IIEF-5 Cut-Off

Details

  • Number of items: 5

  • Item range: 1 to 5

  • Reverse items: none

  • Score range: 1 to 25

  • Cut-off-values: 1-7 = 'Severe ED'; 8-11 = 'Moderate ED'; 12-16 = 'Mild-moderate ED'; 17-21 = 'Mild ED'; 22-25 = 'No ED'

  • Minimal clinically important difference: none

  • Treatment of missing values: No missing values allowed for score calculation

References

Link to questionnaire (http://www.croesoffice.org/Portals/0/Short_IIEF.pdf)

Rosen RC, Cappelleri JC (2000) (https://doi.org/10.1038/sj.ijir.3900472)

Examples

if (FALSE) { library(dplyr) items.iief5 <- paste0("IIEF_", seq(1, 5, 1)) scoring_iief5(mydata, items = items.iief5) }