set seed 17760704 import delimited http://www.puzzlers.org/pub/wordlists/unixdict.txt, clear save temp, replace replace v1=strreverse(v1) merge 1:1 v1 using temp, nogen keep(3) drop if v1>=strreverse(v1) count 158 sample 5, count gen v2=strreverse(v1) list, noheader noobs +-------------+ | evil live | | pat tap | | at ta | | nit tin | | ku uk | +-------------+