聰明不如鈍筆
총명불여둔필

방명록

account_circle
vpn_key
web

security

mode_edit
  • 댓글 수정/삭제
    2020.06.06 22:24

    비밀댓글입니다

  • 댓글 수정/삭제
    2020.06.03 10:53

    비밀댓글입니다

  • 댓글 수정/삭제
    2020.05.13 18:57

    비밀댓글입니다

    • 수정/삭제 kini
      2020.05.17 20:58 신고

      과제 내용을 조금 더 구체적으로 설명해주실 수 있나요?
      작성 중이신 코드를 보여주시는 게 제일 좋습니다.

  • 댓글 수정/삭제 김덕준
    2020.04.25 10:09

    R 네트워크 관련 질문입니다.
    kuduz.tistory.com/1087 와 연관있는 내용입니다.
    만약 fg <- as_tbl_graph(feat) 여기서 공백이 있는 행렬은 공백을 유지한채로 as_tbl_graph 함수를 사용 할 수 없나요?
    예를 들면
    종류 이름 가격
    [1,] 과자 / 새우깡 / 1600원
    [2,] 아이스크림/ / 2000원
    [3,] 과자 / 감자깡/ 1200원
    [4,] 아이스크림 / 투게더 /6000원
    과자 -> 새우깡 ->1600원
    ↘ 감자깡 -> 1200원

    아이스크림 -> 2000원
    ↘ 투게더 -> 6000원
    이런식으로 한 행의 1열 2열 3열을 연결하고 1열을 기준으로 연결하는 네트워크(그래프)를 만들고싶습니다.

    as_tbl_graph 함수를 사용했는데 공백이 있어서 적용이 안됩니다. 공백을 살리고 하는 방법이 궁금합니다.

    조언 부탁드립니다.

    • 수정/삭제 kini
      2020.04.29 23:30 신고

      데이터를 따로 따로 만드시면 되지 않나요?
      [1,] 과자 → 새우깡
      [2,] 새우깡 → 1600원
      이렇게 말입니다.

  • 댓글 수정/삭제 곽재석
    2020.04.18 16:39

    http://sachaepskamp.com/qgraph/examples
    에서 차례대로 안내된 코드를 따라 시각화를 하고 있던 중
    # Significance graph (circular):
    qgraph(Q, graph = "sig", layout = "circular")
    title("Big 5 correlations (p-values)", line = 2.5)
    부분을 입력해서 시각화를 했더니,
    Error in qgraph(Q, graph = "sig", layout = "circular") :
    'graph' argument must be one of 'default', 'cor', 'pcor', 'glasso', 'ggmModSelect', or 'factorial'
    라고 뜨기만 합니다. 오류를 어떻게 하면 해결 할 수 있을까요?

    • 수정/삭제 kini
      2020.04.19 07:41 신고

      Q <- qgraph(cor(big5), minimum = 0.25, cut = 0.4, vsize = 1.5, groups = big5groups,
      legend = TRUE, borders = FALSE)

      이것 자체는 만드신 거죠?

    • 수정/삭제 곽재석
      2020.04.19 16:44

      네!
      Q <- qgraph(cor(big5), minimum = 0.25, cut = 0.4, vsize = 1.5, groups = big5groups,
      legend = TRUE, borders = FALSE)
      하고 난 다음 차례차례 설명된 코드와 그림들을 보며 실행하던 차에

      # Significance graph (circular):
      qgraph(Q, graph = "sig", layout = "circular")
      title("Big 5 correlations (p-values)", line = 2.5)
      를 했더니 저렇게 Error가 떴습니다.

    • 수정/삭제 kini
      2020.04.20 05:45 신고

      https://cran.seoul.go.kr/web/packages/qgraph/qgraph.pdf

      qgraph 패키지를 버전업하면서 graph 항목에 'sig'라는 속성을 더 이상 쓸 수 없게 되어서 생긴 일입니다.

      qgraph(Q, mode='sig', layout = "circular")

      이렇게 쳐보시면 똑같지는 않아도 비슷한 모양이 나올 겁니다.

  • 댓글 수정/삭제 곽재석
    2020.04.18 16:27

    안녕하세요. R로 네트워크 분석 하는 걸 계속 공부중인 대학원생입니다. R관련 포스팅을 보고 문의와 함께 자문을 구해봅니다... 혹시 다음 포스팅 내용으로 https://psycnet.apa.org/doiLanding?doi=10.1037%2Fadb0000379 에서 쓰인 네트워크 분석에 대해 다뤄주실 수 있는지 문의드립니다.... 관련 패키지는 뭘 썼는지 알겠으나 분석 과정을 어떻게 따라가야 할지 막막합니다...

  • 댓글 수정/삭제 문건웅
    2020.04.11 10:34

    안녕하세요? web-r.org를 운영하고 있는 문건웅 입니다. r관련 포스팅 잘 읽고 갑니다. 많은 도움이 되었습니다. 감사합니다.

  • 댓글 수정/삭제
    2020.04.09 08:58

    비밀댓글입니다

    • 수정/삭제 kini
      2020.04.09 23:02 신고

      예, 감사합니다.

      그나저나 성함하고 하시는 일이 참 잘 어울리십니다.

  • 댓글 수정/삭제
    2020.04.08 14:47

    비밀댓글입니다

  • 댓글 수정/삭제 Leesav
    2020.04.03 07:49

    조사자료를 지도에 구현하려는 직작인입니다. 전남지도를 깐후 그위에 자료값을 단계구분도로 표현하려고 했는데 전남지도를 시군으로 표현한 것까지는 되었는데 각 시군을 연결하는 선들이 생겨 삼각형들로 마구 생기네요. 어디가 잘못된 것일까요?
    korea <- shapefile('TL_SCCO_SIG.shp')
    ggplot() + geom_polygon(data=korea, aes(x=long, y=lat, group=group),
    fill='white', color='black')


    korea <- fortify(korea, region='SIG_CD')
    view(korea)


    SigunS <- merge(korea, IsStock, by='id')
    View(SigunS)
    ggplot() + geom_polygon(data=SigunS, aes(x=long, y=lat, group=group), fill='white', color='black')

    • 수정/삭제 kini
      2020.04.08 21:22 신고

      이 경우에는 셰이프 파일을 따로 구하시는 편이 나을 듯합니다.