<?xml version="1.0" encoding="utf-8"?><!DOCTYPE article  PUBLIC '-//OASIS//DTD DocBook XML V4.4//EN'  'http://www.docbook.org/xml/4.4/docbookx.dtd'><article><articleinfo><title>FAQ/WilliamsSPSS/Fisher</title><revhistory><revision><revnumber>26</revnumber><date>2014-03-27 19:22:05</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>25</revnumber><date>2014-03-27 19:11:29</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>24</revnumber><date>2014-03-27 19:08:31</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>23</revnumber><date>2014-03-27 19:08:25</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>22</revnumber><date>2014-03-27 19:04:06</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>21</revnumber><date>2014-03-27 19:03:05</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>20</revnumber><date>2014-03-27 18:58:49</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>19</revnumber><date>2014-03-27 18:58:32</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>18</revnumber><date>2014-03-27 18:55:41</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>17</revnumber><date>2014-03-27 18:55:06</date><authorinitials>RussellThompson</authorinitials></revision><revision><revnumber>16</revnumber><date>2014-03-27 12:34:26</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>15</revnumber><date>2014-03-27 12:17:12</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>14</revnumber><date>2013-03-08 10:17:25</date><authorinitials>localhost</authorinitials><revremark>converted to 1.6 markup</revremark></revision><revision><revnumber>13</revnumber><date>2008-04-21 10:38:57</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>12</revnumber><date>2007-01-15 10:10:28</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>11</revnumber><date>2007-01-15 10:10:03</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>10</revnumber><date>2006-12-06 13:14:56</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>9</revnumber><date>2006-12-06 13:14:32</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>8</revnumber><date>2006-11-08 16:27:48</date><authorinitials>PeterWatson</authorinitials></revision><revision><revnumber>7</revnumber><date>2006-07-18 16:00:18</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision><revision><revnumber>6</revnumber><date>2006-07-18 15:45:04</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision><revision><revnumber>5</revnumber><date>2006-07-18 15:43:07</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision><revision><revnumber>4</revnumber><date>2006-07-17 13:51:43</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision><revision><revnumber>3</revnumber><date>2006-07-17 10:25:32</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision><revision><revnumber>2</revnumber><date>2006-07-12 11:01:24</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision><revision><revnumber>1</revnumber><date>2006-07-12 10:49:45</date><authorinitials>pc0082.mrc-cbu.cam.ac.uk</authorinitials></revision></revhistory></articleinfo><para>Two independent group correlations may be compared using  <ulink url="https://lsr-wiki-02.mrc-cbu.cam.ac.uk/statswiki/FAQ/WilliamsSPSS/Fisher/statswiki/FAQ/WilliamsSPSS/Fisher?action=AttachFile&amp;do=get&amp;target=Fisher.xls">this spreadsheet</ulink>. </para><para>Alternatively copy and paste the syntax <emphasis role="strong">in the box below</emphasis> into a SPSS syntax window, select all and click the run arrow key. Amend the SPSS input data as required. </para><screen><![CDATA[set format f10.5.
DATA LIST free
/r1  r2  n1  n2. 
BEGIN DATA. 
.50 .32 10 13
.59 .31 15  23
.80 .72 20  26
END DATA. 
]]><![CDATA[
================================.
]]><![CDATA[
* /* Fisher's test for two independent
* correlations (r1=r2) having
* n1 and n2 observations
*
* input columns: r1 r2 n1 n2
*
* outputted p-values are one-tailed -
* just double to obtain two-tailed */.
*
*=================================.
set mexpand off.
set format f10.5.
define !indep (  !pos !tokens(1)
                    / !pos !tokens(1)
                   /  !pos !tokens(1)
                  /   !pos !tokens(1)).
compute #lct1=0.5*ln((1+!1)/(1-!1)).
compute #lct2=0.5*ln((1+!2)/(1-!2)).
compute z=0.0.
compute z=(#lct1-#lct2)/sqrt((1/(!3-3))+(1/(!4-3))).
if (z le 0) prob_z=cdfnorm(z).
if (z gt 0) prob_z=1-cdfnorm(z).
list variables=!1 !2 z prob_z.
!enddefine.
]]><![CDATA[
set mexpand on.
!indep r1 r2 n1 n2.
set mprint off.]]></screen><itemizedlist><listitem><para>Multiple invocations of the macro in the same interactive session will produce the following note: </para></listitem></itemizedlist><para>&gt;The macro name specified on the DEFINE command duplicates the name of a previously defined macro.  This instance will take precedence. </para><para>This warning does not indicate a problem and may be ignored. </para><para>* <ulink url="https://lsr-wiki-02.mrc-cbu.cam.ac.uk/statswiki/FAQ/WilliamsSPSS/Fisher/statswiki/FAQ/OMScorrs#">Comparing correlations between two matrices in SPSS</ulink>. </para></article>