WOLFRAM

Wolfram 语言与系统参考资料中心

突出显示给定长度的单词

用 RegularExpression 处理文本数据.

    
Wolfram Language code: text = StringTake[ExampleData[{"Text", "AliceInWonderland"}], 400]
Wolfram Language code: Manipulate[TextCell[Row[List@@StringReplace[text, {RegularExpression["\\b\\w{" <> ToString[u] <> "}\\b"] :> Style["$0", 18, Bold]}]], "TR"], {u, 1, 10, 1}, SaveDefinitions -> True]