AMT

Abbreviated Mental Test (AMT)

Description: Assess elderly patients for the possibility of dementia

Number of Items: 10

Item Question Wording TILDA Variable
1 What is your age? mt001
2 Without looking at your watch, what is the time to the nearest hour? mt002
3 What is the year? mt003
4 What is your home address? mt004
5 Now I’m going to ask you for the names of some people and things. What do people usually use to cut paper? mt005
6 What is your date of birth? mt006
7 In what year did world war two begin? mt007
8 Can you name the current Taoiseach? mt008
9 Can you count backwards from 20 down to 1? mt009
10 Can you please tell me the address I asked you to remember earlier? mt010

Scoring Method:

  • Each answer assigned a score of 1 if answered correctly. A score out of 10 is computed.

  • If there is a score of less than 7 (or a score of less than 5 if item 1 and item 6 are not applicable*) a proxy interview would be recommended.

Citation:

Code

gen AMTscore = 0

foreach var of varlist mt001-mt010 {
    replace AMTscore = AMTscore + 1 if `var' == 1
}
replace AMTscore = -1 if mt001 == -1 // Missing by design
label variable AMTscore "AMT Score (0-10)"

Download Stata .do file

# Create AMT score: 1 point for each correct answer
data$AMTscore <- rowSums(
  data[paste0("mt", sprintf("%03d", 1:10))] == 1,
  na.rm = TRUE
)

# Set score to missing if AMT was missing by design
data$AMTscore[!is.na(data$mt001) & data$mt001 == -1] <- NA_real_

# Variable label
attr(data$AMTscore, "label") <- "AMT Score (0-10)"

Download R file

* Create AMT score: 1 point for each correct answer.
COUNT AMTscore = mt001 TO mt010 (1).

* Set score to missing if AMT was missing by design.
IF (mt001 = -1) AMTscore = $SYSMIS.

VARIABLE LABELS AMTscore "AMT Score (0-10)".

EXECUTE.

Download SPSS .sps file