R:如何按组计算变量占某个值的百分比？

# 创建一个空字典用于存储结果
percentage_by_group = {}

# 按组进行循环计算
for group in data:
    # 初始化变量数量和总数量
    count = 0
    total = len(data[group])
    
    # 计算变量等于某个特定值的数量
    for variable in data[group]:
        if variable == specific_value:
            count += 1
    
    # 计算百分比并存储结果
    percentage = (count / total) * 100
    percentage_by_group[group] = percentage

# 打印结果
for group, percentage in percentage_by_group.items():
    print(f"{group}: {percentage}%")