def R_from_r(r):
    """
    Calculate reflected power R from the reflection amplitude r
    of the Fresnel equations.

    Parameters
    ----------
    r : array like
        Fresnel reflection coefficients

    Returns
    -------
    R : array like
        Reflectivity
    """
    return abs(r)**2