Please list the genre of the movies that are directed by the directors with the highest level of average revenue.
SELECT T2.genre FROM directors AS T1 INNER JOIN movies2directors AS T2 ON T1.directorid = T2.directorid WHERE T1.avg_revenue = 4