Minimizando o NExpectation para uma distribuição personalizada no Mathematica

Isso se refere a uma pergunta anterior de junho: Calculando a expectativa de uma distribuição personalizada no Mathematica Eu tenho uma distribuição mista personalizada definida usando uma segunda distribuição personalizada seguindo as linhas discutidas @Sashaem várias respostas ao longo do ano...