标签超过stat_function ggplot

Question

我在R上使用ggplot2而我试图绘制一些函数。问题是我试图在stat_function生成的彩色图上添加标签。

我发现的唯一一件事是在图例上添加颜色，但是我需要在不在图例中的函数上添加标签（为了我的工作）。

下面提供了示例代码

# coding=utf8
# the above tag defines encoding for this document and is for Python 2.x compatibility

import re

regex = r"1420([0]([6]([6]([8]([0][0-9])|[9][0-9]{2})|[7-9][0-9]{3})|[7-9][0-9]{4})|[1]([5]([3]([1]([9][0-9]|[0-8][0-9]{1})|[0][0-9]{2})|[0-2][0-9]{3})|[0-4][0-9]{4}))"

test_str = ("01/01/2015 00:00:00 (1420066800) до 01/01/2015 23:59:59 (1420153199)\n\n"
    "1420016799     -no\n"
    "1420066799     -no\n"
    "1420066800     -yes\n"
    "1420066801     -yes\n"
    "1420067820     -yes\n"
    "1420067920     -yes\n"
    "1420073199     -yes\n"
    "1420103199     -yes\n"
    "1420152191     -yes\n"
    "1420153181     -yes\n"
    "1420153199     -yes\n"
    "1420153200     -no\n"
    "1420163199     -no")

matches = re.finditer(regex, test_str)

for matchNum, match in enumerate(matches):
    matchNum = matchNum + 1

    print ("Match {matchNum} was found at {start}-{end}: {match}".format(matchNum = matchNum, start = match.start(), end = match.end(), match = match.group()))

    for groupNum in range(0, len(match.groups())):
        groupNum = groupNum + 1

        print ("Group {groupNum} found at {start}-{end}: {group}".format(groupNum = groupNum, start = match.start(groupNum), end = match.end(groupNum), group = match.group(groupNum)))

# Note: for Python 2.7 compatibility, use ur"" to prefix the regex and u"" to prefix the test string and substitution.

提前谢谢