powered by
CheckEntry(ent.typ, ent.str = "")
tkentry
CheckEntry("numeric", "3.14ab") ## [1] "3.14" CheckEntry("integer", "3.") ## [1] "3" CheckEntry("hour", "13") ## [1] "13" CheckEntry("hour", "25") ## [1] "23"
Run the code above in your browser using DataLab