Skip to content

davidaarmstrong/asmcjr

master
Switch branches/tags
Code

Latest commit

 

Git stats

Files

Permalink
Failed to load latest commit information.
Type
Name
Latest commit message
Commit time
 
 
R
 
 
 
 
 
 
man
 
 
src
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

asmcjr

Build Status R-CMD-check

This package supports the book "Analyzing Spatial Models of Choice and Judgment with R". In its second edition, much of the R code has been streamlined. This package contains all of the data and functions to replicate the analyses in the book.

Installation

You can install using the install_github() function from the devtools package. The package requires compilation, so Windows users will have to install Rtools first. For Mac users, you need to make sure you have already installed latest GNU Fortran(gfortran 8.2) and Xcode Developer Tools. Please also make sure you have installed Clang (clang-8.0.0.pkg) if you have not updated R to 4.0.0 version. In order to use rjags package for the Bayesian framework analysis with asmcjr, both users need to install JAGS in advance. Therefore to install asmcjr in your R environment, the devtools package must also be installed and loaded in R beforehand.

For macOS:

install.packages("devtools", dependencies=TRUE)
library(devtools)
devtools::install_github("yl17124/asmcjr")

For Windows:

install.packages("devtools", dependencies=TRUE)
library(devtools)
devtools::install_github("yl17124/asmcjr")

Example 1: Running Bayesian Aldrich-Mckelvey Scaling on the French module of the 2009 European Election Study

data(franceEES2009)
head(franceEES2009, n = 10)

library(asmcjr)
example_result_france <- aldmck(franceEES2009, respondent=1, 
                                polarity=2,missing=c(77,88,89), verbose=FALSE)
                                
str(example_result_france)                        

library(ggplot2)
example_result_graph <- ggplot.resphist(example_result_france, addStim=TRUE, weights="negative", xlab = "Left-Right") +
    theme(legend.position="bottom", aspect.ratio=1) +
    guides(shape = guide_legend(override.aes = list(size = 4),nrow=3)) +
    labs(shape="Party", colour="Party")
print(example_result_graph)


Example 2: Running W-NOMINATE Scaling on 7th Taiwan Legislative Roll Calls

library(readr)
legis_7th_Taiwan <- read_csv("https://raw.githubusercontent.com/yl17124/figures/master/legis_7th_Taiwan.csv")
head(legis_7th_Taiwan, n =10)

library(pscl)
pscl_df <- rollcall(legis_7th_Taiwan[3:ncol(legis_7th_Taiwan)],
                    yea = 1 , nay = 2, notInLegis = c(3,4,5), legis.names = legis_7th_Taiwan$legis.names,
                    vote.names = colnames(legis_7th_Taiwan[3:ncol(legis_7th_Taiwan)]),
                    desc="The 7th Taiwan Legislative Roll Call")

summary(pscl_df, verbose=FALSE)  

library(ggpubr)
library(ggplot2)
library(wnominate)
result <- wnominate(pscl_df, ubeta = 15, uweights = 0.5,
                    dims = 2, minvotes = 20 , lop = 0.025, trials = 3, polarity = c("邱議瑩", "丁守中"), verbose = FALSE)
                    
example_result_graph2 <- rownames_to_column(result$legislators, "legis.names") %>%
  left_join(legis_7th_Taiwan[c("legis.names", "party")], by = "legis.names") %>%
  mutate(coord2D.WEIGHT = coord2D*(result$weights[2])/(result$weights[1])) %>%
  ggscatter(x = "coord1D", y = "coord2D.WEIGHT",
            palette = "jco", shape = "party", point = FALSE,
            ellipse = TRUE, ellipse.type = "confidence", size = 4) +
  scale_y_continuous(limits = c(-0.5, 0.5) ) +
  scale_x_continuous(limits = c(-1, 1)) +
  geom_text(aes(label = factor(party), colour = party), size = 3,
            family="Helvetica", face = "bold", show.legend = FALSE, vjust = -0.5) +
  scale_colour_manual(values = c("#0000ff","#008964","#8b0017"), breaks = c("K", "D","N"))  +
  theme(legend.position = "none") +
  labs(y = "2nd Dimension", x = "1st Dimension") 

print(example_result_graph2)


Potential Installation Errors

If you have received those messages below from macOS or Windows, your device has not installed JAGS. Make sure you have installed JAGS-4 in your computer. The asmcjr has a dependency on rjags package which is just an interface to the JAGS library, and you need to install it to make them run with rjags on your device.

macOS (R: devel)

* checking for file ‘.../DESCRIPTION’ ... OK
* preparing ‘asmcjr’:
* checking DESCRIPTION meta-information ... OK
* cleaning src
* installing the package to process help pages
      -----------------------------------
ERROR: dependency ‘rjags’ is not available for package ‘asmcjr’
* removing ‘/private/var/folders/24/8k48jl6d249_n_qfxwsl6xvm0000gn/T/RtmpJbGPGn/Rinst605c2279a152/asmcjr’
      -----------------------------------
ERROR: package installation failed

macOS (R: 4.0)

* checking for file ‘.../DESCRIPTION’ ... OK
* preparing ‘asmcjr’:
* checking DESCRIPTION meta-information ... OK
* cleaning src
* installing the package to process help pages
      -----------------------------------
* installing *source* package ‘asmcjr’ ...
** using staged installation
** libs
clang -mmacosx-version-min=10.13 -I"/Library/Frameworks/R.framework/Resources/include" -DNDEBUG   -I/usr/local/include   -fPIC  -Wall -g -O2  -c lbfgs_bu3.c -o lbfgs_bu3.o
clang -mmacosx-version-min=10.13 -I"/Library/Frameworks/R.framework/Resources/include" -DNDEBUG   -I/usr/local/include   -fPIC  -Wall -g -O2  -c registerDynamicSymbol.c -o registerDynamicSymbol.o
clang -mmacosx-version-min=10.13 -dynamiclib -Wl,-headerpad_max_install_names -undefined dynamic_lookup -single_module -multiply_defined suppress -L/Library/Frameworks/R.framework/Resources/lib -L/usr/local/lib -o asmcjr.so lbfgs_bu3.o registerDynamicSymbol.o -L/Library/Frameworks/R.framework/Resources/lib -lRlapack -L/Library/Frameworks/R.framework/Resources/lib -lRblas -L/usr/local/gfortran/lib/gcc/x86_64-apple-darwin18/8.2.0 -L/usr/local/gfortran/lib -lgfortran -lquadmath -lm -F/Library/Frameworks/R.framework/.. -framework R -Wl,-framework -Wl,CoreFoundation
ld: warning: directory not found for option '-L/usr/local/gfortran/lib/gcc/x86_64-apple-darwin18/8.2.0'
installing to /private/var/folders/24/8k48jl6d249_n_qfxwsl6xvm0000gn/T/Rtmp0nXqch/Rinstc9785a00e5/00LOCK-asmcjr/00new/asmcjr/libs
** R
** data
*** moving datasets to lazyload DB
** inst
** byte-compile and prepare package for lazy loading
##[error]Error: .onLoad failed in loadNamespace() for 'rjags', details:
  call: dyn.load(file, DLLpath = DLLpath, ...)
  error: unable to load shared object '/Users/runner/runners/2.169.0/work/_temp/Library/rjags/libs/rjags.so':
  dlopen(/Users/runner/runners/2.169.0/work/_temp/Library/rjags/libs/rjags.so, 10): Library not loaded: /usr/local/lib/libjags.4.dylib
  Referenced from: /Users/runner/runners/2.169.0/work/_temp/Library/rjags/libs/rjags.so
  Reason: image not found
Execution halted
ERROR: lazy loading failed for package ‘asmcjr’
* removing ‘/private/var/folders/24/8k48jl6d249_n_qfxwsl6xvm0000gn/T/Rtmp0nXqch/Rinstc9785a00e5/asmcjr’
      -----------------------------------
ERROR: package installation failed
##[error]Error in proc$get_built_file() : Build process failed
Calls: <Anonymous> ... build_package -> with_envvar -> force -> <Anonymous>
Execution halted
##[error]Process completed with exit code 1.

Windows (R: 4.0)

* checking for file 'D:\a\asmcjr\asmcjr/DESCRIPTION' ... OK

* preparing 'asmcjr':

* checking DESCRIPTION meta-information ... OK

* cleaning src

* installing the package to process help pages

      -----------------------------------

* installing *source* package 'asmcjr' ...

** using staged installation

** libs
"c:/rtools40/mingw64/bin/"gcc  -I"C:/R/include" -DNDEBUG          -O2 -Wall  -std=gnu99 -mfpmath=sse -msse2 -mstackrealign -c lbfgs_bu3.c -o lbfgs_bu3.o

"c:/rtools40/mingw64/bin/"gcc  -I"C:/R/include" -DNDEBUG          -O2 -Wall  -std=gnu99 -mfpmath=sse -msse2 -mstackrealign -c registerDynamicSymbol.c -o registerDynamicSymbol.o

c:/rtools40/mingw64/bin/gcc -shared -s -static-libgcc -o asmcjr.dll tmp.def lbfgs_bu3.o registerDynamicSymbol.o -LC:/R/bin/x64 -lRlapack -LC:/R/bin/x64 -lRblas -lgfortran -lm -lquadmath -LC:/R/bin/x64 -lR

installing to C:/Users/RUNNER~1/AppData/Local/Temp/Rtmpeqrx0a/Rinst15f096e2e18/00LOCK-asmcjr/00new/asmcjr/libs/x64

** R

** data

*** moving datasets to lazyload DB

** inst

** byte-compile and prepare package for lazy loading

##[error]Error: .onLoad failed in loadNamespace() for 'rjags', details:

  call: fun(libname, pkgname)

  error: Failed to locate any version of JAGS version 4



The rjags package is just an interface to the JAGS library

Make sure you have installed JAGS-4.x.y.exe (for any x >=0, y>=0) from

http://www.sourceforge.net/projects/mcmc-jags/files

Execution halted

ERROR: lazy loading failed for package 'asmcjr'

* removing 'C:/Users/RUNNER~1/AppData/Local/Temp/Rtmpeqrx0a/Rinst15f096e2e18/asmcjr'

      -----------------------------------

ERROR: package installation failed

##[error]Error in proc$get_built_file() : Build process failed
Calls: <Anonymous> ... build_package -> with_envvar -> force -> <Anonymous>
Execution halted
##[error]Process completed with exit code 1.

Reference

For citation from this book, run citation("asmcjr"). For more learning resources and those who want to learn how to use computational methods to understand the latent properties of your data, please join the course Scaling Methods for Social Science at 2020 ESSEX SUMMER SCHOOL.

About

No description, website, or topics provided.

Resources

Stars

Watchers

Forks

Releases

No releases published

Packages

No packages published