为列表中的每个列表访问列表的第二个元素

Question

我有一个列表列表，所有列表都有相同的长度。例如：

    SELECT DATE_FORMAT(a.prm_po_date, '%c'),
           DATE_FORMAT(a.prm_po_date, '%M'),
           sum(a.prm_po_amount),
           max(t.my_sum),
    FROM prm_po_master a
         LEFT JOIN ( 
            select prm_inv_po_id_xref,  sum(prm_inv_pay_amt) as my_sum
            prm_inv_payment_dtls 
            where prm_inv_pay_active_status = 'Y'
            group by prm_inv_po_id_xref ) t on t.prm_inv_po_id_xref = a.prm_po_id
    WHERE     a.prm_po_dept = 'Information Technology'
          AND a.prm_po_finyear = '2017-18'
          AND a.prm_po_active_status = 'Y'
    GROUP BY month(a.prm_po_date)
    ORDER BY month(a.prm_po_date)

我需要访问此列表中每个列表的第二个元素。在这个例子中，它等同于使用矩阵并使用

a <- list(list(1,2), list(4,8), list(0,1))

但我需要使用列表。