Запуск сценария Python в сценарии R выдает ошибку

Я хочу запустить скрипт Python в RShiny. Я делаю это с помощью функции source (), но это дает мне ошибку. Я очень новичок в R. Кто-нибудь знает, как я могу запустить task1 в Server.R? Моя ОС - Windows.

server.R:

library(shiny) #library
library(shinydashboard) #library
library(devtools)
shinyServer(function(input, output) {
  observeEvent(input$actionID,{
    source("task1.py")
  })
})

task1.py:

from PIL import Image
print("Mayday! Mayday!")

Я получаю следующую ошибку:

Warning: Error in source: task1.py:6:6: unexpected input
5: 
6: from PIL
        ^
  73: source