first test of appveyor

.appveyor.yml

@@ -8,7 +8,11 @@ configuration:  # a trick to construct a build matrix with multiple Python versi
 environment:
   matrix:
     - COMPILER: MSVC
+      TASK: r-package
+      R_WINDOWS_VERSION: 3.6.1
     - COMPILER: MINGW
+      TASK: r-package
+      R_WINDOWS_VERSION: 3.6.1
 
 clone_depth: 5
 
@@ -41,17 +45,18 @@ build_script:
     python setup.py install)
 
 test_script:
-  - pytest %APPVEYOR_BUILD_FOLDER%\tests\python_package_test
-  - cd %APPVEYOR_BUILD_FOLDER%\examples\python-guide
-  - ps: >-
-      @("import matplotlib", "matplotlib.use('Agg')") + (Get-Content "plot_example.py") | Set-Content "plot_example.py"  # prevent interactive window mode
-      (Get-Content "plot_example.py").replace('graph.render(view=True)', 'graph.render(view=False)') | Set-Content "plot_example.py"
-  - ps: >-
-      foreach ($file in @(Get-ChildItem *.py)) {
-        @("import sys, warnings", "warnings.showwarning = lambda message, category, filename, lineno, file=None, line=None: sys.stdout.write(warnings.formatwarning(message, category, filename, lineno, line))") + (Get-Content $file) | Set-Content $file
-        python $file
-        if (!$?) { $host.SetShouldExit(-1) }
-      }  # run all examples
-  - cd %APPVEYOR_BUILD_FOLDER%\examples\python-guide\notebooks
-  - conda install -q -y -n test-env ipywidgets notebook
-  - jupyter nbconvert --ExecutePreprocessor.timeout=180 --to notebook --execute --inplace *.ipynb  # run all notebooks
+  # - pytest %APPVEYOR_BUILD_FOLDER%\tests\python_package_test
+  # - cd %APPVEYOR_BUILD_FOLDER%\examples\python-guide
+  # - ps: >-
+  #     @("import matplotlib", "matplotlib.use('Agg')") + (Get-Content "plot_example.py") | Set-Content "plot_example.py"  # prevent interactive window mode
+  #     (Get-Content "plot_example.py").replace('graph.render(view=True)', 'graph.render(view=False)') | Set-Content "plot_example.py"
+  # - ps: >-
+  #     foreach ($file in @(Get-ChildItem *.py)) {
+  #       @("import sys, warnings", "warnings.showwarning = lambda message, category, filename, lineno, file=None, line=None: sys.stdout.write(warnings.formatwarning(message, category, filename, lineno, line))") + (Get-Content $file) | Set-Content $file
+  #       python $file
+  #       if (!$?) { $host.SetShouldExit(-1) }
+  #     }  # run all examples
+  # - cd %APPVEYOR_BUILD_FOLDER%\examples\python-guide\notebooks
+  # - conda install -q -y -n test-env ipywidgets notebook
+  # - jupyter nbconvert --ExecutePreprocessor.timeout=180 --to notebook --execute --inplace *.ipynb  # run all notebooks
+    - cmd /c "powershell -ExecutionPolicy Bypass -File %APPVEYOR_BUILD_FOLDER%\.ci\test_windows.ps1"

.ci/test_windows.ps1

@@ -35,8 +35,10 @@ elseif ($env:TASK -eq "bdist") {
   cp @(Get-ChildItem *.whl) $env:BUILD_ARTIFACTSTAGINGDIRECTORY
 }
 
-$tests = $env:BUILD_SOURCESDIRECTORY + $(If ($env:TASK -eq "sdist") {"/tests/python_package_test"} Else {"/tests"})  # cannot test C API with "sdist" task
-pytest $tests ; Check-Output $?
+if ($env:TASK -ne "r-package") {
+  $tests = $env:BUILD_SOURCESDIRECTORY + $(If ($env:TASK -eq "sdist") {"/tests/python_package_test"} Else {"/tests"})  # cannot test C API with "sdist" task
+  pytest $tests ; Check-Output $?
+}
 
 if ($env:TASK -eq "regular") {
   cd $env:BUILD_SOURCESDIRECTORY/examples/python-guide
@@ -50,3 +52,57 @@ if ($env:TASK -eq "regular") {
   conda install -q -y -n $env:CONDA_ENV ipywidgets notebook
   jupyter nbconvert --ExecutePreprocessor.timeout=180 --to notebook --execute --inplace *.ipynb ; Check-Output $?  # run all notebooks
 }
+
+# test R package
+# based on https://github.com/RGF-team/rgf/blob/master/R-package/.R.appveyor.ps1
+if ($env:TASK -eq "r-package"){
+
+  Import-CliXml .\env-vars.clixml | % { Set-Item "env:$($_.Name)" $_.Value }
+  tzutil /s "GMT Standard Time"
+  [Void][System.IO.Directory]::CreateDirectory($env:R_LIB_PATH)
+
+  $env:PATH = "$env:R_LIB_PATH\Rtools\bin;" + "$env:R_LIB_PATH\R\bin\x64;" + "$env:R_LIB_PATH\miktex\texmfs\install\miktex\bin\x64;" + $env:PATH
+  $env:BINPREF = "C:/mingw-w64/x86_64-8.1.0-posix-seh-rt_v6-rev0/mingw64/bin/"
+
+  # set up R if it doesn't exist yet
+  if (!(Get-Command R.exe -errorAction SilentlyContinue)) {
+
+      # download R and RTools
+      (New-Object System.Net.WebClient).DownloadFile(https://cloud.r-project.org/bin/windows/base/R-${env:R_WINDOWS_VERSION}-win.exe, ./R-win.exe)
+      (New-Object System.Net.WebClient).DownloadFile(https://cloud.r-project.org/bin/windows/Rtools/Rtools35.exe, ./Rtools.exe)
+
+      # Install R
+      Start-Process -FilePath .\R-win.exe -NoNewWindow -Wait -ArgumentList "/VERYSILENT /DIR=$env:R_LIB_PATH\R /COMPONENTS=main,x64"
+      Start-Process -FilePath .\Rtools.exe -NoNewWindow -Wait -ArgumentList "/VERYSILENT /DIR=$env:R_LIB_PATH\Rtools"
+
+      # download Miktex
+      (New-Object System.Net.WebClient).DownloadFile(https://miktex.org/download/win/miktexsetup-x64.zip, ./miktexsetup-x64.zip)
+      Add-Type -AssemblyName System.IO.Compression.FileSystem
+      [System.IO.Compression.ZipFile]::ExtractToDirectory("miktexsetup-x64.zip", "miktex")
+      .\miktex\miktexsetup.exe --local-package-repository=.\miktex\download --package-set=essential --quiet download
+      .\miktex\download\miktexsetup.exe --portable="$env:R_LIB_PATH\miktex" --quiet install
+  }
+
+  initexmf --set-config-value [MPM]AutoInstall=1
+  conda install -y --no-deps pandoc
+
+  Add-Content .Renviron "R_LIBS=$env:R_LIB_PATH"
+  Add-Content .Rprofile "options(repos = 'https://cran.rstudio.com')"
+  Add-Content .Rprofile "options(pkgType = 'binary')"
+  Add-Content .Rprofile "options(install.packages.check.source = 'no')"
+
+  Rscript -e "install.packes(c('data.table', 'jsonlite', 'Matrix', 'R6', 'testthat'), dependencies = c('Imports', 'Depends', 'LinkingTo'))" ; Check-Output $?
+
+  Rscript build_r.R ; Check-Output $?
+
+  $PKG_FILE_NAME = Get-Item *.tar.gz
+  $PKG_NAME = $PKG_FILE_NAME.BaseName.split("_")[0]
+  $LOG_FILE_NAME = "$PKG_NAME.Rcheck/00check.log"
+
+  R.exe CMD check "${PKG_FILE_NAME}" --as-cran --no-multiarch; Check-Output $?
+
+  if (Get-Content "$LOG_FILE_NAME" | Select-String -Pattern "WARNING" -Quiet) {
+      echo "WARNINGS have been found by R CMD check!"
+      Check-Output $False
+  }
+}

.vsts-ci.yml

@@ -128,6 +128,9 @@ jobs:
       bdist:
         TASK: bdist
         PYTHON_VERSION: 3.5
+      rpkg:
+        TASK: r-package
+        R_WINDOWS_VERSION: 3.6.1
   steps:
   - powershell: Write-Host "##vso[task.prependpath]$env:CONDA\Scripts"
     displayName: Enable conda