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)



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


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.


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.


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


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


The function returns 3 variables:

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

  • score.iief5: IIEF-5 Score

  • cutoff.iief5: IIEF-5 Cut-Off


  • 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


Link to questionnaire (

Rosen RC, Cappelleri JC (2000) (


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