Bloqueie os cantos dos slides para gravação com zoom

Bloqueie os cantos dos slides para gravação com zoom

Estou preparando slides para palestras que irei apresentar e gravar no Zoom. O feed da minha câmera aparecerá no canto superior direito da tela para que os alunos possam me ver, e eu gostaria que o texto nos slides envolvesse automaticamente essa região, sem precisar configurá-lo manualmente em cada slide.

Estou tentando usar wrapfige everypageinserir uma imagem no canto superior direito de cada slide, onde o texto será contornado. (Por enquanto estou usando uma imagem fictícia, mas mais tarde irei transformá-la em um retângulo branco.) Mas não está funcionando: a imagem não está aparecendo no lado direito e o texto não está contornando-a corretamente. Ele também continua gerando um Collision between wrapping environmentsaviso.

Aqui está o código que estou usando:

\documentclass{article}

\usepackage[17pt]{extsizes}
\usepackage[screen, margin=2cm]{geometry}
\pagestyle{empty}
\pagenumbering{gobble}

\usepackage{lipsum}
\usepackage{wrapfig}
\usepackage{everypage}
\usepackage{graphicx}

\AddEverypageHook{
\begin{wrapfigure}{r}{0pt} \includegraphics[width=0.4\textwidth]{example-image-a} \end{wrapfigure}
}

\begin{document}
\lipsum[1-20]
\end{document}

o que há de errado aqui?

Eu ficaria muito feliz com soluções alternativas para este problema (ou seja, não usar wrapfig/ everypage).

EDIT: Acho que wrapfigno final das contas não funcionará, já que minhas anotações envolvem theoremambientes e elas não são agrupadas.

EDIT: Agora encontrei uma solução alternativa. Como a proporção do slide padrão é mais quadrada do que a tela, empurrei o slide para a esquerda na tela para abrir espaço para o feed de vídeo à direita. Para fazer isso, alarguei o slide, mas aumentei correspondentemente o tamanho da margem direita e preenchi o espaço extra com um retângulo preto produzido usando as respostas paraessa questão. Aqui está o código:

\documentclass[oneside]{amsart}

\usepackage[20pt]{extsizes}
\pagenumbering{gobble}
\usepackage[paperwidth=320mm, paperheight=180mm, left=2cm, right=8cm]{geometry}

\usepackage{tikz}
\usetikzlibrary{calc}

\usepackage{fancyhdr}
\usepackage{lipsum}

\pagestyle{fancy}
\fancyhf{}
\fancyhead[R]{%
  \begin{tikzpicture}[overlay,remember picture]
      \fill [color=black]
        (current page.north east)
        rectangle
        ($ (current page.south east) + (-6cm,0cm) $);
  \end{tikzpicture}
}

\renewcommand{\headrulewidth}{0pt}
\renewcommand{\footrulewidth}{0pt}


\begin{document}

\thispagestyle{fancy}

\lipsum

\end{document}

informação relacionada