textInGap: Test for text in gap match

In openPCI/OpenPCIScoring: Automatic Scoring and Analysis of OpenPCI-items

Description

Test for text in gap match

Usage

textInGap(textGapMatchObject, text, gap, no.where.else = TRUE)

Arguments

textGapMatchObject	a textGapMatchObject
text	The text to look for
gap	The gap(s) to look in
no.where.else	Only accept it if it is only here

Value

Returns the scores

Examples

resp<-"{\"dropzone_1\":[\"1.Decide size of building\",\"2.Paint the walls\",\"4.Get a quote\"],\"dropzone_2\":[\"1.Move furniture\",\"2.Hire workers\"],\"dropzone_3\":[\"1.Test the construction\",\"2.Move in\",\"3.Paint the walls\"]}"
gm<-makeTextGapMatch(resp)
textInGap(gm,"Paint the walls","dropzone_1")
textInGap(gm,"Paint the walls","dropzone_1",no.where.else=F)

openPCI/OpenPCIScoring documentation built on June 10, 2021, 1:18 p.m.