How to loop subset of lists in R? -


i have list of 9 lists, see following code want loop 3 lists p, r , t pearson, spearson , kendall correlations, respectively, instead of 9 lists. current pseudocode following test function corrplot(m.cor, ...), see below complete pseudocode

for (i in p.mat.all) { ... }

code mtcars test data

library("psych") library("corrplot")     m <- mtcars   m.cor <- cor(m)  p.mat.all <- psych::corr.test(m.cor, method = c("pearson", "kendall", "spearman"),     adjust = "none", ci = f)  str(p.mat.all)  str(p.mat.all$r)  str(p.mat.all$t)  str(p.mat.all$p)

output list of 9 lists

list of 9  $ r     : num [1:11, 1:11] 1 -0.991 -0.993 -0.956 0.939 ...   ..- attr(*, "dimnames")=list of 2   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...  $ n     : num 11  $ t     : num [1:11, 1:11] inf -21.92 -25.4 -9.78 8.22 ...   ..- attr(*, "dimnames")=list of 2   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...  $ p     : num [1:11, 1:11] 0.00 4.04e-09 1.09e-09 4.32e-06 1.78e-05 ...   ..- attr(*, "dimnames")=list of 2   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...  $ se    : num [1:11, 1:11] 0 0.0452 0.0391 0.0978 0.1143 ...   ..- attr(*, "dimnames")=list of 2   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   .. ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...  $ adjust: chr "none"  $ sym   : logi true  $ ci    : null  $ call  : language psych::corr.test(x = m.cor, method = c("pearson", "kendall", "spearman"),      adjust = "none", ci = f)  - attr(*, "class")= chr [1:2] "psych" "corr.test"  num [1:11, 1:11] 1 -0.991 -0.993 -0.956 0.939 ...  - attr(*, "dimnames")=list of 2   ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...  num [1:11, 1:11] inf -21.92 -25.4 -9.78 8.22 ...  - attr(*, "dimnames")=list of 2   ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...  num [1:11, 1:11] 0.00 4.04e-09 1.09e-09 4.32e-06 1.78e-05 ...  - attr(*, "dimnames")=list of 2   ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...   ..$ : chr [1:11] "mpg" "cyl" "disp" "hp" ...

my pseudocode looping 3 correlations test function corrplot, not work because goes through 9 lists 

for (i in p.mat.all) {   p.mat <-   print("p.mat ===========")   print(i)        alpha <- 0.05    corrplot( m.cor,             method="color",            type="upper",            addcoefaspercent = true,            tl.col = "black",           tl.pos = "td",            p.mat = p.mat, sig.level = alpha, insig = "blank",            order = "original"   ) }

expected output: loop t, p , r lists such can passed test function corrplot

r: 3.3.1
os: debian 8.5

or *apply function:

lapply(p.mat.all[c("r","p","t")], function(x) {   # x takes first p.mat.all$r, p.mat.all$p, etc   print("p.mat ===========")   print(x)        alpha <- 0.05    corrplot( m.cor,             method="color",            type="upper",            addcoefaspercent = true,            tl.col = "black",           tl.pos = "td",            p.mat = x, sig.level = alpha, insig = "blank",            order = "original"   ) })

Comments

Post a Comment

Popular posts from this blog

asynchronous - C# WinSCP .NET assembly: How to upload multiple files asynchronously -

i using winscp .net assembly uploading files. want upload multiple files asynchronous way. have created method works single upload. public class uploadingdata { private sessionoptions _sessionoptions; private session _session; //connection etc private void onconnected() { foreach (var fileinfo in localfileslist) { var task = task.factory.startnew(() => uploadfilesasync(fileinfo)); } } private async task uploadfilesasync(string file) { string remotefilepath = _session.translatelocalpathtoremote(file, @"/", "/test_data_upload"); var uploading = _session.putfiles(file, remotefilepath, false); //when done await task.run(() => thread.sleep(1000)); } } please suggest me correct way. thanks you can use backgroundworker class this: string[] images = new string[50]; foreach (var path in images) { backgroundworker
Read more

aws api gateway - SerializationException in posting new Records via Dynamodb Proxy Service in API -

i getting "__type": "com.amazon.coral.service#serializationexception" as reply in postman & in test console in api gateway trying post record directly dynamodb using api proxy services.. referring aws article - https://aws.amazon.com/blogs/compute/using-amazon-api-gateway-as-a-proxy-for-dynamodb/ here's mapping { "tablename": "tablenamegoeshere", "item": { "id" : "$context.requestid" "eventname" : "$input.path('$.eventname')", "timestamp" : $input.path('$.timestamp'), "answers": "$util.parsejson($input.path('$.answers'))" } } update: did asked ... , worked if try add array of json objects gives me above same error - here's trying now. please - couldnt find on google well #set($inputroot = $input.path('$')) { "tablename": "answer", "item": {
Read more

asp.net - Problems sending emails from forum -

i have been redesigning site has message board, has been written guy looked after site. it has few problems , written in .asp , uses .mdb files database. you can see whole thing here . feel free post if helps, test thing have set using original files , new database. the basic problem when posts message, supposed email sent them, have posted it. when replies, originator supposed message, replier has been posted. i’d have thought @ point in process there should script/file in postmessage.asp? the postmessage.asp page below. <% option explicit %> <!-- #include virtual="common/adovbs.inc" --> <html> <head> <meta http-equiv="content-type" content="text/html; charset=windows-1252"> <meta name="generator" content="microsoft frontpage 4.0"> <meta name="progid" content="frontpage.editor.document"> <title>new page 2</title> <base target="_self"
Read more