ℒ[(Subscript[X, i,j])[1]]/.ω_ 𝔼[{Q_,P0_,P1a_,P1b_}]:>Factor@px2g[P0 P1a]

ℒ[(Subscript[X, i,j])[1]]/.{T->(Subscript[T, 1]),(Subscript[p, i_]):>(Subscript[p, 1,i]), (Subscript[x, i_]):>(Subscript[x, 1,i])}

CF[(1/2) ϵ (-1+((Subscript[p, 1,i])-(Subscript[p, 1,j])) (Subscript[x, 1,i]) ((-1+(Subscript[T, 1])) (Subscript[p, 1,j]) (Subscript[x, 1,i])+2 (1-(Subscript[p, 1,j]) (Subscript[x, 1,j]))))]

ℒ[(Subscript[X, i,j])[1]]/.{T->(Subscript[T, 1]),(Subscript[p, i_]):>(Subscript[p, 1,i]), (Subscript[x, i_]):>(Subscript[x, 1,i])}/.ω_ 𝔼[{Q_,P0_,P1a_,P1b_}]:>Simplify@g2px[px2g[P1b]//.(Subscript[gR, 1,i,j])/.{(Subscript[δ, i_,i_])->1,(Subscript[δ, i,j])->0,(Subscript[δ, j,i])->0}]

ℒ[(Subscript[X, i,j])[1]]/.{T->(Subscript[T, 1]),(Subscript[p, i_]):>(Subscript[p, 1,i]), (Subscript[x, i_]):>(Subscript[x, 1,i])}/.ω_ 𝔼[{Q_,P0_,P1a_,P1b_}]:>Simplify@g2px[px2g[P1b]//.(Subscript[igR, 1,i,j])/.{(Subscript[δ, i,(SuperPlus[i])])->0,(Subscript[δ, j,(SuperPlus[j])])->0,(Subscript[δ, j,i])->0,(Subscript[δ, j,(SuperPlus[i])])->0,(Subscript[δ, i,(SuperPlus[j])])->0}]