[Rcicr-users] Obtaining Noise Image

[Rodrigo Cardenas]

Dear Ron,

Thank you for your reply. I read your post and tried the code posted by
Daniel as well as yours (someCI$ci), using my data. However, both images
are not identical, so now I am wondering which one I should use. My goal is
to generate a noise image that I can use for the analysis done with the
matlab toolbox stat4CI, as described in Dotsch, R., & Todorov, A. (2012).
Reverse correlating social face perception. Social Psychological and
Personality Science, 3 (5), 562-571. Any help/guidance with this will be
much appreciated.

Best,

Rodrigo

On Sat, Aug 22, 2015 at 8:29 AM, Dotsch, R. (Ron) <R.Dotsch at uu.nl> wrote:

> Hi Dan,
>
> This looks fine to me. If you have a ci object, for instance the output of:
>
> someCI <- generateCI2IFC(…)
>
> you can get the raw noise in a 512x512 pixel matrix without base image
> using:
>
> someCI$ci
>
> This is not well-documented yet, but you can rely on it (so does rcicr).
>
> Best,
>
> Ron
>
>
> _____________________
> Ron Dotsch
> Associate Professor
> Department of Psychology
> Utrecht University
> http://ron.dotsch.org/
>
>
>
> On 21 Aug 2015, at 17:48, Daniel Albohn <d.albohn at gmail.com> wrote:
>
> Hello,
>
> I am writing the listserv to get some feedback on how to obtain just a
> noise image from a reverse correlation task (i.e., without the base image).
> Through looking at the documentation, I believe this is possible, although
> there are not many examples or supporting documents to confirm my
> suspicious. As such, I wanted to make sure my code was actually giving me
> what I want it to give me.
>
> ----R code----
>
> data <- read.csv("rcicrData1.csv")
>
> ##Apparently this is unneeded for creating just a noise image?##
> n <- 'rcicrdata.Rdata'
>
> responses <- as.vector(data$correct)
>
> s <- generateNoisePattern(img_size = 512, pre_0.3.0 = TRUE)
>
> noise <- generateCINoise(data$Face, data$correct, s)
> image(noise) #it's in color?
>
> ##output grey scale image##
> jpeg("Noise_img.jpg",
>      width = 512, height = 512, units = "px")
> par(mar = rep(0,4))
> image(noise, axes=FALSE, col = grey(seq(0,1, length = 512)))
> dev.off()
>
> ---End Code---
>
> Any thoughts, suggestions, or critiques would be appreciated! Again, I am
> looking to output a noise image from RC data, much like generating a CI,
> but without the base image underneath.
>
> Thanks,
> Dan
>
> --
>
> Daniel Albohn
> Website <http://www.sites.psu.edu/albohn> | 484-332-7688
> _______________________________________________
> Rcicr-users mailing list
> Rcicr-users at lists.r-forge.r-project.org
> http://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcicr-users
>
>
>
> _______________________________________________
> Rcicr-users mailing list
> Rcicr-users at lists.r-forge.r-project.org
> http://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcicr-users
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.r-forge.r-project.org/pipermail/rcicr-users/attachments/20150831/4299171f/attachment.html>