1def calculate_corn_yield(field_size, kernels_per_ear, ears_per_acre):
2    """
3    根据田地参数计算估算的玉米产量。
4    
5    参数：
6        field_size (float): 田地面积（英亩）
7        kernels_per_ear (int): 每穗的平均粒数
8        ears_per_acre (int): 每英亩的穗数
9    
10    返回：
11        tuple: (每英亩产量，总产量)（以蒲式耳为单位）
12    """
13    # 计算每英亩产量
14    yield_per_acre = (kernels_per_ear * ears_per_acre) / 90000
15    
16    # 计算总产量
17    total_yield = yield_per_acre * field_size
18    
19    return (yield_per_acre, total_yield)
20
21# 示例用法
22field_size = 15.5  # 英亩
23kernels_per_ear = 525  # 粒数
24ears_per_acre = 32000  # 穗数
25
26yield_per_acre, total_yield = calculate_corn_yield(field_size, kernels_per_ear, ears_per_acre)
27print(f"估算产量：{yield_per_acre:.2f} 蒲式耳每英亩")
28print(f"总田地产量：{total_yield:.2f} 蒲式耳")
29

1/**
2 * 根据田地参数计算玉米产量
3 * @param {number} fieldSize - 田地面积（英亩）
4 * @param {number} kernelsPerEar - 每穗的平均粒数
5 * @param {number} earsPerAcre - 每英亩的穗数
6 * @returns {Object} 包含每英亩产量和总产量（以蒲式耳为单位）的对象
7 */
8function calculateCornYield(fieldSize, kernelsPerEar, earsPerAcre) {
9  // 验证输入
10  if (fieldSize < 0.1) {
11    throw new Error('田地面积必须至少为0.1英亩');
12  }
13  
14  if (kernelsPerEar < 1 || earsPerAcre < 1) {
15    throw new Error('每穗粒数和每英亩穗数必须为正数');
16  }
17  
18  // 计算每英亩产量
19  const yieldPerAcre = (kernelsPerEar * earsPerAcre) / 90000;
20  
21  // 计算总产量
22  const totalYield = yieldPerAcre * fieldSize;
23  
24  return {
25    yieldPerAcre: yieldPerAcre.toFixed(2),
26    totalYield: totalYield.toFixed(2)
27  };
28}
29
30// 示例用法
31const result = calculateCornYield(20, 550, 30000);
32console.log(`每英亩产量：${result.yieldPerAcre} 蒲式耳`);
33console.log(`总产量：${result.totalYield} 蒲式耳`);
34

1public class CornYieldCalculator {
2    private static final int KERNELS_PER_BUSHEL = 90000;
3    
4    /**
5     * 根据田地参数计算玉米产量
6     * 
7     * @param fieldSize 田地面积（英亩）
8     * @param kernelsPerEar 每穗的平均粒数
9     * @param earsPerAcre 每英亩的穗数
10     * @return 包含[每英亩产量，总产量]（以蒲式耳为单位）的数组
11     */
12    public static double[] calculateYield(double fieldSize, int kernelsPerEar, int earsPerAcre) {
13        // 计算每英亩产量
14        double yieldPerAcre = (double)(kernelsPerEar * earsPerAcre) / KERNELS_PER_BUSHEL;
15        
16        // 计算总产量
17        double totalYield = yieldPerAcre * fieldSize;
18        
19        return new double[] {yieldPerAcre, totalYield};
20    }
21    
22    public static void main(String[] args) {
23        // 示例参数
24        double fieldSize = 25.5; // 英亩
25        int kernelsPerEar = 480; // 粒数
26        int earsPerAcre = 28000; // 穗数
27        
28        double[] results = calculateYield(fieldSize, kernelsPerEar, earsPerAcre);
29        
30        System.out.printf("每英亩产量：%.2f 蒲式耳%n", results[0]);
31        System.out.printf("总产量：%.2f 蒲式耳%n", results[1]);
32    }
33}
34

1# R函数用于玉米产量计算
2
3calculate_corn_yield <- function(field_size, kernels_per_ear, ears_per_acre) {
4  # 验证输入
5  if (field_size < 0.1) {
6    stop("田地面积必须至少为0.1英亩")
7  }
8  
9  if (kernels_per_ear < 1 || ears_per_acre < 1) {
10    stop("每穗粒数和每英亩穗数必须为正数")
11  }
12  
13  # 计算每英亩产量
14  yield_per_acre <- (kernels_per_ear * ears_per_acre) / 90000
15  
16  # 计算总产量
17  total_yield <- yield_per_acre * field_size
18  
19  # 返回结果作为命名列表
20  return(list(
21    yield_per_acre = yield_per_acre,
22    total_yield = total_yield
23  ))
24}
25
26# 示例用法
27field_params <- list(
28  field_size = 18.5,  # 英亩
29  kernels_per_ear = 520,  # 粒数
30  ears_per_acre = 31000  # 穗数
31)
32
33result <- do.call(calculate_corn_yield, field_params)
34
35cat(sprintf("每英亩产量：%.2f 蒲式耳\n", result$yield_per_acre))
36cat(sprintf("总产量：%.2f 蒲式耳\n", result$total_yield))
37