# NOT RUN {
data(twb)
twb.shared <- shared.repertoire(twb)
G <- mutation.network(twb.shared)
head(mutated.neighbours(G, 1)[[1]])
# label vseg repind prob people npeople
# 1 CASSDRDTGELFF TRBV6-4 1 -1 1111 4
# 2 CASSDSDTGELFF TRBV6-4 69 -1 1100 2
# 3 CASSYRDTGELFF TRBV6-3, TRBV6-2 315 -1 1001 2
# 4 CASKDRDTGELFF TRBV6-3, TRBV6-2 2584 -1 0100 1
# 5 CASSDGDTGELFF TRBV6-4 5653 -1 0010 1
# 6 CASSDRETGELFF TRBV6-4 5950 -1 0100 1
# }
Run the code above in your browser using DataLab