[racket] Porter stemming algorithm

On Sun, Feb 5, 2012 at 3:42 AM, John Sampson <jrs.idx at ntlworld.com> wrote:
> Hello -
>
> see http://programmingpraxis.com/2009/09/08/porter-stemming/


Awesome.  Ok, I've taken the code there and  put it up as a Racket
PLaneT package to make it easier to use.

For example:

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#lang racket/base
(require (planet dyoo/porter-stemmer))

(stem "racketeer")
(stem "singing")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


When you first run it, it may take a while.  Give it a minute or so to
install the porter-stemming package off the network and compile it.
Subsequent runs should be fast.

Here's what I see when I run the program:

#############################
kui ~/Downloads $ racket foo.rkt
"racket"
"sing"
#############################