Finding inverse matrix in R












3















I have a variance covariance matrix S:



> S
[,1] [,2]
[1,] 4 -3
[2,] -3 9


I am trying to find an inverse of it.



The code I have is:



>invS <- (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))*S
[,1] [,2]
[1,] 0.1481481 -0.1111111
[2,] -0.1111111 0.3333333


However, if I use solve(), I get this:



>invSalt <- solve(S)
[,1] [,2]
[1,] 0.3333333 0.1111111
[2,] 0.1111111 0.1481481


Why is invS incorrect? What should I change to correct it?










share|improve this question



























    3















    I have a variance covariance matrix S:



    > S
    [,1] [,2]
    [1,] 4 -3
    [2,] -3 9


    I am trying to find an inverse of it.



    The code I have is:



    >invS <- (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))*S
    [,1] [,2]
    [1,] 0.1481481 -0.1111111
    [2,] -0.1111111 0.3333333


    However, if I use solve(), I get this:



    >invSalt <- solve(S)
    [,1] [,2]
    [1,] 0.3333333 0.1111111
    [2,] 0.1111111 0.1481481


    Why is invS incorrect? What should I change to correct it?










    share|improve this question

























      3












      3








      3








      I have a variance covariance matrix S:



      > S
      [,1] [,2]
      [1,] 4 -3
      [2,] -3 9


      I am trying to find an inverse of it.



      The code I have is:



      >invS <- (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))*S
      [,1] [,2]
      [1,] 0.1481481 -0.1111111
      [2,] -0.1111111 0.3333333


      However, if I use solve(), I get this:



      >invSalt <- solve(S)
      [,1] [,2]
      [1,] 0.3333333 0.1111111
      [2,] 0.1111111 0.1481481


      Why is invS incorrect? What should I change to correct it?










      share|improve this question














      I have a variance covariance matrix S:



      > S
      [,1] [,2]
      [1,] 4 -3
      [2,] -3 9


      I am trying to find an inverse of it.



      The code I have is:



      >invS <- (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))*S
      [,1] [,2]
      [1,] 0.1481481 -0.1111111
      [2,] -0.1111111 0.3333333


      However, if I use solve(), I get this:



      >invSalt <- solve(S)
      [,1] [,2]
      [1,] 0.3333333 0.1111111
      [2,] 0.1111111 0.1481481


      Why is invS incorrect? What should I change to correct it?







      r covariance variance covariance-matrix






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked Nov 23 '18 at 18:08









      Feyzi BagirovFeyzi Bagirov

      4001723




      4001723
























          2 Answers
          2






          active

          oldest

          votes


















          3














          You correctly found the determinant in the denominator, but the rest is wrong.



          enter image description here



          Off-diagonal elements should be with the opposite sign, while the diagonal elements should be switched. Both of those things are clearly visible when comparing the two matrices.



          That's not the most convenient thing to do by hand, so solve is really better. If you insist on doing it manually, then you could use



          matrix(rev(S), 2, 2) / (prod(diag(S)) - S[1, 2] * S[2, 1]) * (2 * diag(1, 2) - 1)
          # [,1] [,2]
          # [1,] 0.3333333 0.1111111
          # [2,] 0.1111111 0.1481481





          share|improve this answer

































            3














            The correct formula is



             (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))* matrix(c(S[2,2], -S[2,1], -S[1,2], S[1,1]),2)





            share|improve this answer























              Your Answer






              StackExchange.ifUsing("editor", function () {
              StackExchange.using("externalEditor", function () {
              StackExchange.using("snippets", function () {
              StackExchange.snippets.init();
              });
              });
              }, "code-snippets");

              StackExchange.ready(function() {
              var channelOptions = {
              tags: "".split(" "),
              id: "1"
              };
              initTagRenderer("".split(" "), "".split(" "), channelOptions);

              StackExchange.using("externalEditor", function() {
              // Have to fire editor after snippets, if snippets enabled
              if (StackExchange.settings.snippets.snippetsEnabled) {
              StackExchange.using("snippets", function() {
              createEditor();
              });
              }
              else {
              createEditor();
              }
              });

              function createEditor() {
              StackExchange.prepareEditor({
              heartbeatType: 'answer',
              autoActivateHeartbeat: false,
              convertImagesToLinks: true,
              noModals: true,
              showLowRepImageUploadWarning: true,
              reputationToPostImages: 10,
              bindNavPrevention: true,
              postfix: "",
              imageUploader: {
              brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
              contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
              allowUrls: true
              },
              onDemand: true,
              discardSelector: ".discard-answer"
              ,immediatelyShowMarkdownHelp:true
              });


              }
              });














              draft saved

              draft discarded


















              StackExchange.ready(
              function () {
              StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53451259%2ffinding-inverse-matrix-in-r%23new-answer', 'question_page');
              }
              );

              Post as a guest















              Required, but never shown

























              2 Answers
              2






              active

              oldest

              votes








              2 Answers
              2






              active

              oldest

              votes









              active

              oldest

              votes






              active

              oldest

              votes









              3














              You correctly found the determinant in the denominator, but the rest is wrong.



              enter image description here



              Off-diagonal elements should be with the opposite sign, while the diagonal elements should be switched. Both of those things are clearly visible when comparing the two matrices.



              That's not the most convenient thing to do by hand, so solve is really better. If you insist on doing it manually, then you could use



              matrix(rev(S), 2, 2) / (prod(diag(S)) - S[1, 2] * S[2, 1]) * (2 * diag(1, 2) - 1)
              # [,1] [,2]
              # [1,] 0.3333333 0.1111111
              # [2,] 0.1111111 0.1481481





              share|improve this answer






























                3














                You correctly found the determinant in the denominator, but the rest is wrong.



                enter image description here



                Off-diagonal elements should be with the opposite sign, while the diagonal elements should be switched. Both of those things are clearly visible when comparing the two matrices.



                That's not the most convenient thing to do by hand, so solve is really better. If you insist on doing it manually, then you could use



                matrix(rev(S), 2, 2) / (prod(diag(S)) - S[1, 2] * S[2, 1]) * (2 * diag(1, 2) - 1)
                # [,1] [,2]
                # [1,] 0.3333333 0.1111111
                # [2,] 0.1111111 0.1481481





                share|improve this answer




























                  3












                  3








                  3







                  You correctly found the determinant in the denominator, but the rest is wrong.



                  enter image description here



                  Off-diagonal elements should be with the opposite sign, while the diagonal elements should be switched. Both of those things are clearly visible when comparing the two matrices.



                  That's not the most convenient thing to do by hand, so solve is really better. If you insist on doing it manually, then you could use



                  matrix(rev(S), 2, 2) / (prod(diag(S)) - S[1, 2] * S[2, 1]) * (2 * diag(1, 2) - 1)
                  # [,1] [,2]
                  # [1,] 0.3333333 0.1111111
                  # [2,] 0.1111111 0.1481481





                  share|improve this answer















                  You correctly found the determinant in the denominator, but the rest is wrong.



                  enter image description here



                  Off-diagonal elements should be with the opposite sign, while the diagonal elements should be switched. Both of those things are clearly visible when comparing the two matrices.



                  That's not the most convenient thing to do by hand, so solve is really better. If you insist on doing it manually, then you could use



                  matrix(rev(S), 2, 2) / (prod(diag(S)) - S[1, 2] * S[2, 1]) * (2 * diag(1, 2) - 1)
                  # [,1] [,2]
                  # [1,] 0.3333333 0.1111111
                  # [2,] 0.1111111 0.1481481






                  share|improve this answer














                  share|improve this answer



                  share|improve this answer








                  edited Nov 23 '18 at 18:21

























                  answered Nov 23 '18 at 18:14









                  Julius VainoraJulius Vainora

                  36.9k76481




                  36.9k76481

























                      3














                      The correct formula is



                       (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))* matrix(c(S[2,2], -S[2,1], -S[1,2], S[1,1]),2)





                      share|improve this answer




























                        3














                        The correct formula is



                         (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))* matrix(c(S[2,2], -S[2,1], -S[1,2], S[1,1]),2)





                        share|improve this answer


























                          3












                          3








                          3







                          The correct formula is



                           (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))* matrix(c(S[2,2], -S[2,1], -S[1,2], S[1,1]),2)





                          share|improve this answer













                          The correct formula is



                           (1/((S[1,1]*S[2,2])-(S[1,2]*S[2,1])))* matrix(c(S[2,2], -S[2,1], -S[1,2], S[1,1]),2)






                          share|improve this answer












                          share|improve this answer



                          share|improve this answer










                          answered Nov 23 '18 at 18:18









                          dwwdww

                          15k22656




                          15k22656






























                              draft saved

                              draft discarded




















































                              Thanks for contributing an answer to Stack Overflow!


                              • Please be sure to answer the question. Provide details and share your research!

                              But avoid



                              • Asking for help, clarification, or responding to other answers.

                              • Making statements based on opinion; back them up with references or personal experience.


                              To learn more, see our tips on writing great answers.




                              draft saved


                              draft discarded














                              StackExchange.ready(
                              function () {
                              StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53451259%2ffinding-inverse-matrix-in-r%23new-answer', 'question_page');
                              }
                              );

                              Post as a guest















                              Required, but never shown





















































                              Required, but never shown














                              Required, but never shown












                              Required, but never shown







                              Required, but never shown

































                              Required, but never shown














                              Required, but never shown












                              Required, but never shown







                              Required, but never shown







                              Popular posts from this blog

                              404 Error Contact Form 7 ajax form submitting

                              How to know if a Active Directory user can login interactively

                              Refactoring coordinates for Minecraft Pi buildings written in Python