CI + basic fixes for CRAN checks

.Rbuildignore

@@ -5,3 +5,4 @@ HOWTO_WRITE_A_MODEL
 mkpkg$
 orig$
 LICENSE
+^\.github$

.github/.gitignore

@@ -0,0 +1 @@
+*.html

.github/workflows/R-CMD-check.yaml

@@ -0,0 +1,51 @@
+# Workflow derived from https://github.com/r-lib/actions/tree/v2/examples
+# Need help debugging build failures? Start at https://github.com/r-lib/actions#where-to-find-help
+on:
+  push:
+    branches: [main, master]
+  pull_request:
+
+name: R-CMD-check.yaml
+
+permissions: read-all
+
+jobs:
+  R-CMD-check:
+    runs-on: ${{ matrix.config.os }}
+
+    name: ${{ matrix.config.os }} (${{ matrix.config.r }})
+
+    strategy:
+      fail-fast: false
+      matrix:
+        config:
+          - {os: macos-latest,   r: 'release'}
+          - {os: windows-latest, r: 'release'}
+          - {os: ubuntu-latest,   r: 'devel', http-user-agent: 'release'}
+          - {os: ubuntu-latest,   r: 'release'}
+          - {os: ubuntu-latest,   r: 'oldrel-1'}
+
+    env:
+      GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}
+      R_KEEP_PKG_SOURCE: yes
+
+    steps:
+      - uses: actions/checkout@v4
+
+      - uses: r-lib/actions/setup-pandoc@v2
+
+      - uses: r-lib/actions/setup-r@v2
+        with:
+          r-version: ${{ matrix.config.r }}
+          http-user-agent: ${{ matrix.config.http-user-agent }}
+          use-public-rspm: true
+
+      - uses: r-lib/actions/setup-r-dependencies@v2
+        with:
+          extra-packages: any::rcmdcheck
+          needs: check
+
+      - uses: r-lib/actions/check-r-package@v2
+        with:
+          upload-snapshots: true
+          build_args: 'c("--no-manual","--compact-vignettes=gs+qpdf")'

DESCRIPTION

@@ -12,11 +12,12 @@ Description: Latent and Stochastic Block Model estimation by a Variational EM al
 License: LGPL-2.1
 Depends: R (>= 3.4.0)
 LinkingTo: Rcpp, RcppArmadillo
-RoxygenNote: 7.1.1
+RoxygenNote: 7.3.2
 Imports: 
     Rcpp,
     parallel, 
     methods, 
     digest
+Encoding: UTF-8
 URL: https://github.com/jb-leger/blockmodels
 BugReports: https://github.com/jb-leger/blockmodels/issues

R/zbernoulli_covariates.R

@@ -5,7 +5,7 @@ BM_bernoulli_covariates <- setRefClass("BM_bernoulli_covariates",
     methods = list(
         initialize = function(membership_type,adj,covariates,...)
         {
-            if(class(covariates)=="matrix")
+            if (is.matrix(covariates))
             {
                 covariates_list <- list(covariates)
             }

R/zbernoulli_covariates_fast.R

@@ -5,7 +5,7 @@ BM_bernoulli_covariates_fast <- setRefClass("BM_bernoulli_covariates_fast",
     methods = list(
         initialize = function(membership_type,adj,covariates,...)
         {
-            if(class(covariates)=="matrix")
+            if (is.matrix(covariates))
             {
                 covariates_list <- list(covariates)
             }

R/zgaussian_covariates.R

@@ -4,7 +4,7 @@ BM_gaussian_covariates <- setRefClass("BM_gaussian_covariates",
     methods = list(
         initialize = function(membership_type,adj,covariates,...)
         {
-            if(class(covariates)=="matrix")
+            if (is.matrix(covariates))
             {
                 covariates_list <- list(covariates)
             }

R/zpoisson_covariates.R

@@ -4,7 +4,7 @@ BM_poisson_covariates <- setRefClass("BM_poisson_covariates",
     methods = list(
         initialize = function(membership_type,adj,covariates,...)
         {
-            if(class(covariates)=="matrix")
+            if(is.matrix(covariates))
             {
                 covariates_list <- list(covariates)
             }

README.md

@@ -0,0 +1,27 @@
+
+# blockmodels
+
+<!-- badges: start -->
+[![R-CMD-check](https://github.com/GrossSBM/blockmodels/actions/workflows/R-CMD-check.yaml/badge.svg)](https://github.com/GrossSBM/blockmodels/actions/workflows/R-CMD-check.yaml)
+<!-- badges: end -->
+
+The goal of blockmodels is to ...
+
+## Installation
+
+You can install the development version of blockmodels from [GitHub](https://github.com/) with:
+
+``` r
+# install.packages("pak")
+pak::pak("GrossSBM/blockmodels")
+```
+
+## Example
+
+This is a basic example which shows you how to solve a common problem:
+
+``` r
+library(blockmodels)
+## basic example code
+```
+

blockmodels.Rproj

@@ -1,4 +1,5 @@
 Version: 1.0
+ProjectId: c95d3751-b2ba-4d9c-a9a4-891738f8f0b2
 
 RestoreWorkspace: Default
 SaveWorkspace: Default